* add "pear run-tests" command

diff --git a/pear/PEAR/Command/Package.php b/pear/PEAR/Command/Package.php
index e63b9cec9130ad69a57cdd753e1989cd71bae7da..344a91ac307000a4bddd08d6b1b197c8a03311ed 100644 (file)
--- a/pear/PEAR/Command/Package.php
+++ b/pear/PEAR/Command/Package.php
@@ -71,7 +71,8 @@ class PEAR_Command_Package extends PEAR_Command_Common
                      'package-info' => 'Show Package Info',
                      'package-list' => 'List Files in Package',
                      'package-validate' => 'Validate Package',
-                     'cvstag' => 'Set CVS Release Tag');
+                     'cvstag' => 'Set CVS Release Tag',
+                     'run-tests' => 'Run Regression Tests');
     }
 
     // }}}
@@ -389,6 +390,24 @@ class PEAR_Command_Package extends PEAR_Command_Common
                 break;
             }
 
+            // }}}
+            // {{{ run-tests 
+
+            case 'run-tests': {
+                $cwd = getcwd();
+                $php = PHP_BINDIR . '/php' . (OS_WINDOWS ? '.exe' : '');
+                $ip = ini_get("include_path");
+                $ps = OS_WINDOWS ? ';' : ':';
+                $run_tests = $this->config->get('php_dir') . DIRECTORY_SEPARATOR . 'run-tests.php';
+                if (!file_exists($run_tests)) {
+                    $run_tests = PEAR_INSTALL_DIR . DIRECTORY_SEPARATOR . 'run-tests.php';
+                }
+                $plist = implode(" ", $params);
+                $cmd = "$php -d include_path=$cwd$ps$ip $run_tests $plist";
+                system($cmd);
+                break;
+            }
+
             // }}}
             default: {
                 return false;