Show
Ignore:
Timestamp:
06/27/08 11:23:41 (6 months ago)
Author:
karpet
Message:

update build script to use svn

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • swish-e/trunk/buildswishe.pl

    r1854 r2146  
    8686#   0.12    Sat Nov 11 14:58:26 CST 2006 
    8787#    fixed swish-e get src to respect explicit opt path 
     88#    
     89#   0.13    Fri Jun 27 10:18:42 CDT 2008 
     90#    change from CVS to SVN (only a year+ late...) 
    8891# 
    8992################################################################################ 
    …… 
    102105use FindBin qw( $Bin ); 
    103106 
    104 my $Version = '0.12'; 
     107my $Version = '0.13'; 
    105108 
    106109my %URLs = ( 
    …… 
    120123); 
    121124 
    122 my $swish_cvs = ':pserver:anonymous@swishe.cvs.sourceforge.net:/cvsroot/swishe'; 
    123 my $cvs_cmd   = "cvs -q -d$swish_cvs co swish-e"; 
     125my $swish_svn = 'http://svn.swish-e.org/swish-e/trunk'; 
     126my $svn_cmd   = "svn -q co "; 
    124127 
    125128my $defdir = '/usr/local/swish-e/latest'; 
    …… 
    133136 
    134137    'quiet'     => "run non-interactively", 
    135     'cvs'       => "use latest CVS version of Swish-e", 
     138    'svn'       => "use latest Subversion trunk version of Swish-e", 
    136139    'swish-e=s' => 
    137140      "use <X> as Swish-e source -- either URL, tar.gz or directory", 
    …… 
    12961299 
    12971300    # --swishe trumps all 
    1298     # else if we've specified --cvs, download latest. 
     1301    # else if we've specified --svn, download latest. 
    12991302    # else check if script was run from a src dir. 
    13001303    # if all else fails, use the get_src() function to locate it. 
    …… 
    13031306    print "we're in " . `pwd` if $opts->{debug}; 
    13041307 
    1305     if ($opts->{cvs}) 
    1306     { 
    1307  
    1308         # get latest cvs source and set dir 
     1308    if ($opts->{svn}) 
     1309    { 
     1310 
     1311        # get latest svn source and set dir 
    13091312 
    13101313        chdir($tmpdir) or die "can't chdir $tmpdir: $!\n"; 
    …… 
    13151318 
    13161319            chdir('swish-e') or die "can't chdir swish-e: $!\n"; 
    1317             $cvs_cmd =~ s/co swish-e/update -dP/; 
    1318         } 
    1319  
    1320         system($cvs_cmd); 
     1320            $svn_cmd =~ s/co /update /; 
     1321        } 
     1322 
     1323        system("$svn_cmd $swish_svn swish-e"); 
    13211324        $swishdir = "$tmpdir/swish-e"; 
    13221325