[Fai-commit] r4440 - trunk/bin

[lange at alioth.debian.org]

Author: lange
Date: 2007-07-12 15:36:34 +0000 (Thu, 12 Jul 2007)
New Revision: 4440

Modified:
   trunk/bin/install_packages
Log:
fix syntax errors


Modified: trunk/bin/install_packages
===================================================================
--- trunk/bin/install_packages	2007-07-12 15:34:56 UTC (rev 4439)
+++ trunk/bin/install_packages	2007-07-12 15:36:34 UTC (rev 4440)
@@ -34,7 +34,7 @@
 use Getopt::Std;
 
 # global variables
-our ($opt_d,$opt_l,$opt_L,$opt_v,$opt_h,$opt_m,opt_n,$opt_N,$opt_p);
+our ($opt_d,$opt_l,$opt_L,$opt_v,$opt_h,$opt_m,$opt_n,$opt_N,$opt_p);
 my $listonly; # flag, that indicates that only a list of packages will be printed
 our @commands;
 our %command;
@@ -192,7 +192,7 @@
     }
     if ($opt_L) {
       # only print the package list
-      execute("$rootcmd $command{inst-internal} @known | egrep ^Inst");
+      execute("$rootcmd $command{'inst-internal'} @known | egrep ^Inst");
       exit 0;
     }
     # pass only maxpl packages to apt-get