Changeset 16042

Timestamp:

Jan 8, 2008, 1:39:48 PM (18 years ago)

Author:

eugene

Message:

check to !build

File:

• trunk/psconfig/pscheckperl (modified) (5 diffs)

trunk/psconfig/pscheckperl

@@ -4 +4 @@
 
 $version = "";
-$check = 1;
+$build = 0;
 @tARGV = ();
 for (; @ARGV > 0; ) {
@@ -12 +12 @@
     }
     if ($ARGV[0] eq "-build") {
-        $check = 0;
+        $build = 1;
         shift; next;
     }
@@ -57 +57 @@
 print "PERL5LIB: $ENV{'PERL5LIB'}\n";
 
-if (!$check && ! -d $PSCONFDIR) {
+if ($build && ! -d $PSCONFDIR) {
     mkdir $PSCONFDIR || die "unable to create psconfig dir $PSCONFDIR";
 }
@@ -78 +78 @@
 
     print "$module: missing\n";
-    if ($check) { 
+    if (!$build) { 
         $Nmissing ++;
         push @missing, $module;
@@ -112 +112 @@
     chdir $homedir;
 }
-if ($check) {
+if (!$build) {
     if ($Nmissing > 0) {
         print "The following $Nmissing perl modules are missing from your system\n";