mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-06 14:22:31 -07:00
Code Issues Projects Releases Wiki Activity

Improve output format for option display

Browse source 
Copied from Perforce
 Change: 19010
 ServerID: perforce.ravenbrook.com
This commit is contained in:
Richard Tucker 1997-11-17 15:48:15 +00:00
parent b2adefabd4
commit 28c60fa26b
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
mps/qa/test/script/optproc
View file

@ -133,7 +133,7 @@ sub explainoptions {
foreach $key (@keys) {
$optname = "MMQA_$key";
if (&optioncode($key)) {
$optcode = "-".&optioncode($key)." <value>";
$optcode = "-".&optioncode($key)." <val>";
} elsif (&flagcode($key)) {
$optcode = "-[no]".&flagcode($key);
} else {
@ -149,7 +149,9 @@ sub displayalloptions {
}
format OPTLIST =
@<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<<<<< @*
@<<<<<<<<<<<<<<<<<<<<< @<<<<<<<<< ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$optname, $optcode, $optcur
~~ ^<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
$optcur
.