mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-03-29 02:02:50 -07:00
Remove mmqa_ from option display, to increase width
Copied from Perforce Change: 20581 ServerID: perforce.ravenbrook.com
This commit is contained in:
parent
35bfba6141
commit
2d701ee026
1 changed files with 5 additions and 2 deletions
|
|
@ -1,5 +1,5 @@
|
|||
#!/usr/local/perl -w
|
||||
# $HopeName: MMQA_harness!script:optproc(trunk.14) $
|
||||
# $HopeName: MMQA_harness!script:optproc(trunk.15) $
|
||||
#
|
||||
# subroutines for processing options to qa commands
|
||||
# Each command can specify which options it requires,
|
||||
|
|
@ -176,7 +176,7 @@ sub explainoptions {
|
|||
print "\n";
|
||||
|
||||
foreach $key (sort @keys) {
|
||||
$optname = "MMQA_$key";
|
||||
$optname = "$key";
|
||||
if (&optioncode($key)) {
|
||||
$optcode = "-".&optioncode($key)." <val>";
|
||||
} elsif (&flagcode($key)) {
|
||||
|
|
@ -195,6 +195,9 @@ sub displayalloptions {
|
|||
|
||||
";
|
||||
&explainoptions(values %qa_options, values %qa_flags);
|
||||
print"
|
||||
(Add MMQA_ to start of option to give environment variable)
|
||||
";
|
||||
print"------------------------------------------------------------------------
|
||||
";
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue