Ticket #344: wiki2html.diff
File wiki2html.diff, 463 bytes (added by , 14 years ago) |
---|
-
scripts/wiki2html.scm
diff --git a/scripts/wiki2html.scm b/scripts/wiki2html.scm index c885f95..a34d53a 100644
a b 199 199 (let ((href (second m))) 200 200 (if (string-match (rx +http-url+) href) 201 201 href 202 (string-append "http:// chicken.wiki.br/" href))))202 (string-append "http://wiki.call-cc.org/" href)))) 203 203 "'>" 204 204 (clean (or (third m) (second m))) 205 205 "</a>")))