fix for Console_GetOpt 2.0 (what was 1.1 - re-release being negotiated)

1 files changed, 2 insertions, 0 deletions

diff --git a/pear/scripts/pearcmd.php b/pear/scripts/pearcmd.php
index 678e77d617..09b2e30af9 100644
--- a/pear/scripts/pearcmd.php
+++ b/pear/scripts/pearcmd.php
@@ -48,6 +48,7 @@ $all_commands = PEAR_Command::getCommands();
 
 $argv = Console_Getopt::readPHPArgv();
 $progname = basename($argv[0]);
+array_shift($argv);
 $options = Console_Getopt::getopt($argv, "c:C:d:D:Gh?sSqu:vV");
 if (PEAR::isError($options)) {
     usage($options);
@@ -155,6 +156,7 @@ if ($fetype == 'Gtk') {
 
     $short_args = $long_args = null;
     PEAR_Command::getGetoptArgs($command, $short_args, $long_args);
+    array_shift($options[1]);
     if (PEAR::isError($tmp = Console_Getopt::getopt($options[1], $short_args, $long_args))) {
         break;
     }