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

View of /FigCommon/switch_to_release.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.9 - (download) (as text) (annotate)
Tue May 17 16:22:03 2005 UTC (14 years, 7 months ago) by olson
Branch: MAIN
CVS Tags: merge-trunktag-bobdev_news-2, Root-bobdev_news, merge-bobdev_news-1, merge-trunktag-bobdev_news-1, merge-bobdev_news-2
Branch point for: Branch-bobdev_news
Changes since 1.8: +3 -1 lines
RTConfig support.

use FIG;

#
# switch_to_release <release_number>
#
# Change the currently-running release to <release_number>
#
# Check to be sure that $fig_disk/dist/releases/<release_number> exists
#
# Update $fig_disk/CURRENT_RELEASE with the new release number.
#
# Swing the symlinks $fig_disk/FIG/bin and $fig_disk/FIG/CGI to the right place
#
# Create the symlink $fig_disk/dist/releases/current to point to <release_number>
#
# Create a symlink $fig_disk/dist/releases/last to point to the pre-switch release.
#
# Expand the environment-specific tool headers from $fig_disk/config/base_tool_hdr
# to include the release-specific directories. Place the output in
# dist/releases/<release_number>/<arch>.
#

require FigCommon::SwitchRelease;

if (@ARGV != 1)
{
    die "Usage: switch_to_release release-number";
}

my $release_number = $ARGV[0];

#
# We assume the architecture name is keept in $RTARCH in the environment.
#
my $arch = $ENV{RTARCH};

FigCommon::SwitchRelease::switch_to_release($FIG_Config::fig_disk, $arch, $release_number);


MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3