Parent Directory | Revision Log | Patch
revision 24 by dpavlin, Thu Dec 13 12:42:45 2007 UTC | revision 25 by dpavlin, Thu Dec 13 12:54:43 2007 UTC | |
---|---|---|
# | Line 133 sub surround { | Line 133 sub surround { |
133 | ||
134 | sub pre { | sub pre { |
135 | my $text = shift; | my $text = shift; |
136 | $text =~ s/^{{{//; | $text =~ s/^{{{\s*//s; |
137 | $text =~ s/}}}$//; | $text =~ s/\s*}}}$//s; |
138 | return '.pre' . $text . '.pre'; | return "\n.pre\n" . $text . "\n.pre\n"; |
139 | } | } |
140 | ||
141 | sub convert_markup { | sub convert_markup { |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |