diff options
author | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-02-19 04:47:12 +0000 |
---|---|---|
committer | fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b> | 2007-02-19 04:47:12 +0000 |
commit | 06ff1feea054f42909776528b73787afaac202f8 (patch) | |
tree | bc8a3f10c049af665d9e93241f795708b290c265 /web/mkdemos.pl | |
parent | 8138fc48aef34ebb8b383d2fc766a617a101bbd3 (diff) |
Use 'highlight' to produce syntax-highlighted versions of
xml, html, and tex demo pages (in website /examples/).
Add links so that html files can be viewed as web pages
(without syntax highlighting).
git-svn-id: https://pandoc.googlecode.com/svn/trunk@543 788f1e2b-df1e-0410-8736-df70ead52e1b
Diffstat (limited to 'web/mkdemos.pl')
-rwxr-xr-x | web/mkdemos.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/web/mkdemos.pl b/web/mkdemos.pl index 02e5da2f6..a56a8dc06 100755 --- a/web/mkdemos.pl +++ b/web/mkdemos.pl @@ -21,7 +21,11 @@ while (<IN>) { $line =~ s/ ([A-Za-z0-9_:\/]+(\.|\/)[a-zA-Z0-9.\/]*|README|S5DEMO)/ <a href="$1">$1<\/a>/g; $line =~ s/-/\\-/g; $line =~ s/^(.*)$/ <code>$1<\/code>/g; + if ( $line =~ /(example\d+\.html)<\/a><\/code>/m ) { + $line .= "\n (View [`$1` as a web page]($1).)\n"; + } } print OUT $line; } + |