diff --git a/pear/scripts/pearcmd.php b/pear/scripts/pearcmd.php
index c50e15c7abe..e1d1cb15bf5 100644
--- a/pear/scripts/pearcmd.php
+++ b/pear/scripts/pearcmd.php
@@ -46,7 +46,8 @@ PEAR_Command::setFrontendType('CLI');
 $all_commands = PEAR_Command::getCommands();
 
 $argv = Console_Getopt::readPHPArgv();
-$progname = basename($argv[0]);
+/* $progname = basename($argv[0]); */
+$progname = 'pear';
 array_shift($argv);
 $options = Console_Getopt::getopt2($argv, "c:C:d:D:Gh?sSqu:vV");
 if (PEAR::isError($options)) {