[Bio] / FigCommon / switch_to_release.pl Repository:
ViewVC logotype

Diff of /FigCommon/switch_to_release.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.3, Fri Dec 19 20:04:03 2003 UTC revision 1.6, Fri Dec 19 20:59:20 2003 UTC
# Line 1  Line 1 
1    
2    use FIG;
3    
4    
5  #  #
6  # switch_to_release <release_number>  # switch_to_release <release_number>
7  #  #
# Line 20  Line 24 
24  #  #
25  # FIXME  # FIXME
26  #  #
27  my $arch = "mac";  my $arch = $ENV{RTARCH};
28    
29  if (! -d $release_dir)  if (! -d $release_dir)
30  {  {
# Line 48  Line 52 
52  symlink("../dist/releases/$release_number/CGI", "$FIG_Config::fig_disk/FIG/CGI");  symlink("../dist/releases/$release_number/CGI", "$FIG_Config::fig_disk/FIG/CGI");
53    
54  &FIG::run("cd $release_dir; make clean; make");  &FIG::run("cd $release_dir; make clean; make");
55    
56    #
57    # Fix up permissions so we can do things as a different user later.
58    #
59    
60    chmod(0777, $FIG_Config::fig_disk);
61    chmod(0777, "$FIG_Config::fig_disk/FIG");
62    chmod(0777, "$FIG_Config::fig_disk/FIG/bin");
63    chmod(0777, "$FIG_Config::fig_disk/FIG/CGI");
64    
65    &FIG::run("chmod ugo+w $FIG_Config::fig_disk");
66    &FIG::run("chmod ugo+w $FIG_Config::fig_disk/CURRENT_RELEASE");
67    &FIG::run("chmod ugo+w $FIG_Config::fig_disk/FIG");
68    &FIG::run("chmod ugo+w $FIG_Config::fig_disk/FIG/bin");
69    &FIG::run("chmod ugo+w $FIG_Config::fig_disk/FIG/CGI");
70    &FIG::run("chmod ugo+w $FIG_Config::fig_disk/dist/releases");
71    &FIG::run("chmod  -R ugo+w $release_dir");

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.6

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3