From: Greg Beaver <cellog@php.net>
Date: Sat, 6 Dec 2003 23:52:44 +0000 (+0000)
Subject: MFH
X-Git-Tag: php-4.3.5RC1~98
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=a4c86a50bb43a26acaf0aba672aea07b4d766265;p=php

MFH
---

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;
     }