Changeset 59

Timestamp:

08/30/07 19:22:23 (6 years ago)

Author:

bruno

Message:

Do not call env_init before testing for action

File:

• devel/pb/bin/pb (modified) (2 diffs)

devel/pb/bin/pb

@@ -59 +59 @@
     $debug = 0  if ($debug == -1);
     }
+# Handles test option
+if (defined $opts{'t'}) {
+    $test = "TRUE";
+    # Works only for SVN
+    $option = "-r BASE";
+}
+
+# Get Action
+$action = shift @ARGV;
+die syntax() if (not defined $action);
+
 # Handles project name if any
 if (defined $opts{'p'}) {
@@ -65 +76 @@
     $ENV{'PBPROJ'} = env_init();
 }
-
-# Handles test option
-if (defined $opts{'t'}) {
-    $test = "TRUE";
-    # Works only for SVN
-    $option = "-r BASE";
-}
-
-# Get Action
-$action = shift @ARGV;
-die syntax() if (not defined $action);
 
 print $LOG "Project $ENV{'PBPROJ'}\n" if ($debug >= 0);