Mercurial > octave-libgccjit
comparison scripts/mkdoc.pl @ 18940:29fc1736a6be
scripts/mkdoc.pl: remove '@(end )?example' leading spaces from DOCSTRING.
author | Carnë Draug <carandraug@octave.org> |
---|---|
date | Fri, 18 Jul 2014 00:03:22 +0100 |
parents | b0960d4afe5f |
children | 714ce8ca71ea |
comparison
equal
deleted
inserted
replaced
18939:b0960d4afe5f | 18940:29fc1736a6be |
---|---|
66 | 66 |
67 foreach (@help_txt) | 67 foreach (@help_txt) |
68 { | 68 { |
69 my $in_example = (m/\s*\@example\b/ .. m/\s*\@end\s+example\b/); | 69 my $in_example = (m/\s*\@example\b/ .. m/\s*\@end\s+example\b/); |
70 s/^\s+\@/\@/ unless $in_example; | 70 s/^\s+\@/\@/ unless $in_example; |
71 s/^\s+(\@(?:end)\s+group)/$1/; | 71 s/^\s+(\@(?:end)\s+(group|example))/$1/; |
72 print $_; | 72 print $_; |
73 } | 73 } |
74 } | 74 } |
75 | 75 |
76 ################################################################################ | 76 ################################################################################ |