Changeset 1393


Ignore:
Timestamp:
Jan 24, 2012, 4:17:09 PM (7 years ago)
Author:
bruno
Message:
  • Fix some printing aspects and add removal of sources for cleanssh
File:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb/bin/pb

    r1392 r1393  
    32883288            $pbtag = "0.[0-9][0-9]*";
    32893289            $findstr .= "-name \'$pbrealpkgrpm-$pbver-$pbtag\.*.rpm\' -o -name \'$pbrealpkgrpm-debug-$pbver-$pbtag\.*.rpm\' -o -name \'$pbrealpkgdeb"."_$pbver-$pbtag"."_*\.deb\' -o -name \'$pbrealpkgdeb"."_$pbver-$pbtag.dsc\' -o -name \'$pbrealpkgdeb"."_$pbver-$pbtag.tar.gz\' -o -name \'$pbrealpkg-$pbver"."_p[0-9]*\.ebuild\' -o -name \'$pbrealpkg-$pbver-$pbtag*\.pkg\' -o -name \'$pbrealpkg-$pbver-$pbtag*\.sd\' ";
     3290            $srcstr .= "src/$pbrealpkg-$pbver.tar.gz src/$pbrealpkg-$pbver.pbconf.tar.gz ";
    32903291        } else {
    32913292            $findstr .= "-name \'$pbrealpkgrpm-$pbver-$pbtag\.*.rpm\' -o -name \'$pbrealpkgdeb"."_$pbver*\.deb\' -o -name \'$pbrealpkg-$pbver*\.ebuild\' -o -name \'$pbrealpkg-$pbver*\.pkg\' -o -name \'$pbrealpkg-$pbver*\.sd\' ";
    3292             $srcstr .= "src/$pbrealpkg-$pbver.tar.gz src/$pbrealpkg-$pbver.pbconf.tar.gz";
    32933293        }
    32943294
     
    33533353    pb_send2target("Announce");
    33543354
    3355     # Nothing more for th cleanssh case
    3356     return if ($antype eq "Clean");
    3357 
    33583355    my $sl = "Project $ENV{'PBPROJ'} version $ENV{'PBPROJVER'} is now available";
    33593356    if ($antype eq "Announce") {
     
    33923389                $i = 1;
    33933390            }
     3391        }
     3392    } elsif ($antype eq "Clean") {
     3393        while (<LOG>) {
     3394            # skip errors
     3395            next if ($_ !~ /^removed /);
     3396            pb_log(0,"$_");
    33943397        }
    33953398    } else {
     
    34093412    }
    34103413    close(LOG);
     3414
     3415    # Nothing more for the cleanssh case
     3416    return if ($antype eq "Clean");
    34113417
    34123418    if ($antype eq "Check") {
Note: See TracChangeset for help on using the changeset viewer.