Commit 4e84d13c authored by Antoine Martin's avatar Antoine Martin
Browse files

Insert string as is prevents regex syntax problems

parent 502b2fa3
......@@ -79,12 +79,8 @@
(read-write-file (html-pathname html-text stream)
(write-sequence
(regex-replace
"\\<h2 class=\\\"chapter\\\"\\>1 Introduction\\<\\/h2\\>"
"\\<h2 class=\\\"chapter\\\"\\>1 Introduction\\<\\/h2\\>\\n"
html-text
(format nil
"<h2 class=\"chapter\">1 Introduction</h2>
<pre>
~A
</pre>"
(file-to-string readme-pathname)))
(list :match
(file-to-string readme-pathname)))
stream)))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment