Changeset 342


Ignore:
Timestamp:
Mar 30, 2008, 1:42:39 AM (11 years ago)
Author:
bruno
Message:

linuxcoe version cvs now builds. Rest to see tags for cvs

File:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb/lib/ProjectBuilder/Base.pm

    r339 r342  
    11201120    my $base=basename($destdir);
    11211121    # CVS also needs a modules name not a dir
    1122     if (-d $source) {
    1123         $tmp1 = $source;
    1124         $tmp1 =~ s|$ENV{'PBROOTDIR'}/||;
    1125         $tmp1 =~ s|$ENV{'PBDIR'}/||;
     1122    #if (-d $source) {
     1123        $tmp1 = basename($source);
     1124        #} else {
     1125        #$tmp1 = dirname($source);
     1126        #$tmp1 = basename($tmp1);
     1127        #}
     1128    my $optcvs = "";
     1129
     1130    # If we're working on the CVS itself
     1131    my $cvstag = basename($ENV{'PBROOTDIR'});
     1132    my $cvsopt = "";
     1133    if ($cvstag eq "cvs") {
     1134        my $pbdate = strftime("%Y-%m-%d %H:%M:%S", @date);
     1135        $cvsopt = "-D \"$pbdate\"";
    11261136    } else {
    1127         $tmp1 = dirname($source);
    1128         $tmp1 =~ s|$ENV{'PBROOTDIR'}/||;
    1129         $tmp1 =~ s|$ENV{'PBDIR'}/||;
    1130         $tmp1 = $tmp1."/".basename($source);
    1131     }
    1132     my $pbdate = strftime("%Y-%m-%d %H:%M:%S", @date);
    1133     pb_system("cd $dir ; cvs -d $account\@$host:$path export -D \"$pbdate\" -d $base $tmp1","Exporting $source from CVS to $destdir");
     1137        # we're working on a tag which should be the last part of PBROOTDIR
     1138        $cvsopt = "-r $cvstag";
     1139    }
     1140    pb_system("cd $dir ; cvs -d $account\@$host:$path export $cvsopt -d $base $tmp1","Exporting $tmp1 from $source under CVS to $destdir");
    11341141} else {
    11351142    die "cms $scheme unknown";
Note: See TracChangeset for help on using the changeset viewer.