(myformat.perl): Simplify generated HTML for "\optional{...}".

This commit is contained in:
Fred Drake 1996-11-11 20:51:09 +00:00
parent b33021b572
commit 4464022799
1 changed files with 2 additions and 2 deletions

View File

@ -6,7 +6,7 @@
# #
# XXX Not complete: \indexii etc.; \funcitem etc. # XXX Not complete: \indexii etc.; \funcitem etc.
package main; package main;
# \bcode and \ecode brackets around verbatim # \bcode and \ecode brackets around verbatim
@ -28,7 +28,7 @@ sub do_cmd_e{ "\\" }
sub do_cmd_optional{ sub do_cmd_optional{
local($_) = @_; local($_) = @_;
s/$any_next_pair_pr_rx/<BIG>\[<\/BIG><VAR>\2<\/VAR><BIG>\]<\/BIG>/; s/$any_next_pair_pr_rx/<BIG>\[<\/BIG>\2<BIG>\]<\/BIG>/;
$_; $_;
} }