diff options
Diffstat (limited to 'docs-xml/scripts')
| -rwxr-xr-x | docs-xml/scripts/neatquotes.pl | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/docs-xml/scripts/neatquotes.pl b/docs-xml/scripts/neatquotes.pl deleted file mode 100755 index 9d5aa6e9e3..0000000000 --- a/docs-xml/scripts/neatquotes.pl +++ /dev/null @@ -1,12 +0,0 @@ -#!/usr/bin/perl - -my $inprog = 0; - -while(<STDIN>) { - if(/<(programlisting|screen)>/) { $inprog = 1; } - if(/<\/(programlisting|screen)>/) { $inprog = 0; } - if(not /="(.*)"/ and not $inprog) { - s/"(.*?)"/<quote>\1<\/quote>/g; - } - print $_; -} |