Changeset 30 in ProjectBuilder

Timestamp:

Aug 2, 2007, 12:39:27 AM (17 years ago)

Author:

Bruno Cornec

Message:

fix typos

Location:

devel/pb

Files:

• bin/pb.pl (modified) (5 diffs)
• lib/common.pm (modified) (2 diffs)

devel/pb/bin/pb.pl

@@ -119 +119 @@
         my $dir = $defpkgdir{$pbpkg};
         $dir = $extpkgdir{$pbpkg} if (not defined $dir);
-        pbsystem("$ENV{'PBCMSEXP'} $option $ENV{'PBROOT'}/$dir $dest 1>/dev/null", "Exporting $ENV{'PBROOT'}/$dir... ");
+        pbsystem("$ENV{'PBCMSEXP'} $option $ENV{'PBROOT'}/$dir $dest 1>/dev/null", "Exporting $ENV{'PBROOT'}/$dir");
 
         # Creates a REVISION file
@@ -127 +127 @@
 
         # Extract cms log history and store it
-        pbsystem("$ENV{'PBCMSLOG'} $option $ENV{'PBROOT'}/$dir > $dest/$ENV{'PBCMSLOGFILE'}", "Extracting log info... ");
+        pbsystem("$ENV{'PBCMSLOG'} $option $ENV{'PBROOT'}/$dir > $dest/$ENV{'PBCMSLOGFILE'}", "Extracting log info");
 
         my %build;
@@ -249 +249 @@
         chdir "$ENV{'PBDESTDIR'}";
         # Possibility to look at PBSRC to guess more the filename
-        pbsystem("tar cfphz $pbpkg-$pbver.tar.gz $pbpkg-$pbver","Creating $pbpkg tar files (gzip... ");
+        pbsystem("tar cfphz $pbpkg-$pbver.tar.gz $pbpkg-$pbver","Creating $pbpkg tar files compressed");
         if ($? == -1) {
             print $LOG "failed to execute: $!\n" if ($debug >= 0);
@@ -310 +310 @@
             foreach my $f (@specfile) {
                 if ($f =~ /\.spec$/) {
-                    pbsystem("rpmbuild -ba $f","Building package with $f... ");
+                    pbsystem("rpmbuild -ba $f","Building package with $f");
                     last;
                 }
@@ -395 +395 @@
 my @files;
 
-pbsystem("tar xfz $src $dir >/dev/null","Extracting build files... ");
+pbsystem("tar xfz $src $dir >/dev/null","Extracting build files");
 opendir(DIR,"$dir") || die "Unable to open directory $dir";
 foreach my $f (readdir(DIR)) {

devel/pb/lib/common.pm

@@ -132 +132 @@
 
 my $cmd=shift;
-my $cmt=shift || $cmt=$cmd;
+my $cmt=shift || $cmd;
 
-print $LOG "$cmt ...";
+print $LOG "$cmt... ";
 system("$cmd");
 if ($? == -1) {
@@ -141 +141 @@
     printf $LOG "child died with signal %d, %s coredump\n", ($? & 127),  ($? & 128) ? 'with' : 'without' if ($debug >= 0);
 } else {
-    print $LOG " OK\n" if ($debug >= 0);
+    print $LOG "OK\n" if ($debug >= 0);
+}
 }
 1;