Changeset 495 in ProjectBuilder for devel/pb-modules/bin/pbdistrocheck

Timestamp:

Jul 10, 2008, 11:36:18 AM (16 years ago)

Author:

Bruno Cornec

Message:

• all global variables are prefixed with pb
• First attempt at using locale and gettext
• use of pb_display and pb_display_init added
• Update presentation following RMLL 2008

File:

• devel/pb-modules/bin/pbdistrocheck (modified) (1 diff)

devel/pb-modules/bin/pbdistrocheck

@@ -19 +19 @@
 GetOptions("verbose|v+" => \$opts{'v'});
 if (defined $opts{'v'}) {
-    $debug = $opts{'v'};
+    $pbdebug = $opts{'v'};
 }
 if (defined $opts{'l'}) {
-    open(LOG,"> $opts{'l'}") || die "Unable to log to $opts{'l'}: $!";
-    $LOG = \*LOG;
-    $debug = 0  if ($debug == -1);
+    open(pbLOG,"> $opts{'l'}") || die "Unable to log to $opts{'l'}: $!";
+    $pbLOG = \*pbLOG;
+    $pbdebug = 0  if ($pbdebug == -1);
     }
-pb_log_init($debug, $LOG);
+pb_log_init($pbdebug, $pbLOG);
 
 my ($ddir, $dver, $dfam, $dtype, $pbsuf) = pb_distro_init();