Author: adam-guest
Date: 2008-03-23 18:55:27 +0000 (Sun, 23 Mar 2008)
New Revision: 1184

Modified:
   trunk/scripts/debuild.pl
Log:
Actually make --prepend-path work rather than just DEBUILD_PREPEND_PATH

Modified: trunk/scripts/debuild.pl
===================================================================
--- trunk/scripts/debuild.pl    2008-03-23 18:44:16 UTC (rev 1183)
+++ trunk/scripts/debuild.pl    2008-03-23 18:55:27 UTC (rev 1184)
@@ -520,6 +520,19 @@
            $check_dirname_regex = $1;
            next;
        }
+
+       if ($arg eq '--prepend-path') {
+           unless (defined ($opt = shift)) {
+               fatal "--prepend-path requires an argument,\nrun $progname 
--help for usage information";
+           }
+           $prepend_path = $opt;
+           next;
+       }
+       if ($arg =~ /^--prepend-path=(.*)$/) {
+           $prepend_path = $1;
+           next;
+       }
+
        if ($arg =~ /^--no-?conf$/) {
            fatal "$arg is only acceptable as the first command-line option!";
        }
@@ -565,7 +578,7 @@
     $ENV{'PATH'} =~ /^(.*)$/;
     $ENV{'PATH'} = $1;
 } else {
-    $ENV{'PATH'} = "/usr/sbin:/usr/bin:/sbin:/bin:/usr/bin/X11"
+    $ENV{'PATH'} = "/usr/sbin:/usr/bin:/sbin:/bin:/usr/bin/X11";
     $ENV{'PATH'} = join(':', $prepend_path, $ENV{'PATH'}) if $prepend_path;
 }
 $save_vars{'PATH'}=1;



-- 
To unsubscribe, send mail to [EMAIL PROTECTED]

Reply via email to