php/archived-php-src
1
0
Fork 0
mirror of https://github.com/php/php-src.git synced 2026-04-29 19:23:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

* options displayed in "pear help" did not have option parameters listed

Browse Source
This commit is contained in:
Stig Bakken
2002-10-10 00:51:21 +00:00
parent 5cd142d736
commit 08f9799c46
1 changed files with 12 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files
pear/PEAR/Command/Common.php
+12 -21
View File
@@ -194,30 +194,21 @@ class PEAR_Command_Common extends PEAR
{
$help = "Options:\n";
foreach ($this->commands[$command]['options'] as $k => $v) {
if (isset($v['arg'])) {
if ($v['arg']{0} == '(') {
$arg = substr($v['arg'], 1, -1);
$sapp = " [$arg]";
$lapp = "[=$arg]";
} else {
$sapp = " $v[arg]";
$lapp = "=$v[arg]";
}
}
if (isset($v['shortopt'])) {
$s = $v['shortopt'];
if (strlen($s) > 1 && $s{1} == ':') {
$argname = '';
$optional = false;
if (strlen($s) > 2 && $s{2} == ':') {
$optional = true;
$argname = substr($s, 3);
} else {
$argname = substr($s, 2);
}
if (empty($argname)) {
$argname = 'arg';
}
if ($optional) {
$help .= " -$s [$argname], --{$k}[=$argname]\n";
} else {
$help .= " -$s $argname, --$k=$argname\n";
}
} else {
$help .= " -$s, --$k\n";
}
$help .= " -$s$sapp, --$k$lapp\n";
} else {
$help .= " --$k\n";
$help .= " --$k$lapp\n";
}
$help .= " $v[doc]\n";
}