From be81a49e006ea52518577808f87ab428fcfa7f40 Mon Sep 17 00:00:00 2001 From: Edi Weitz Date: Wed, 20 Oct 2010 12:05:40 +0000 Subject: [PATCH] Typo git-svn-id: svn://bknr.net/svn/trunk/thirdparty/cl-ppcre@4620 4281704c-cde7-0310-8518-8e2dc76b1ff0 --- api.lisp | 4 ++-- doc/index.html | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/api.lisp b/api.lisp index 3de391a..9b0d451 100644 --- a/api.lisp +++ b/api.lisp @@ -1224,8 +1224,8 @@ sections. These sections may nest." (let* ((*use-bmh-matchers* nil) (comment-scanner (create-scanner "(?s)\\(\\?#.*?\\)")) (extended-comment-scanner (create-scanner "(?m:#.*?$)|(?s:\\(\\?#.*?\\))")) - (quote-token-scanner "\\\\[QE]") - (quote-token-replace-scanner "\\\\([QE])")) + (quote-token-scanner (create-scanner "\\\\[QE]")) + (quote-token-replace-scanner (create-scanner "\\\\([QE])"))) (defun clean-comments (string &optional extended-mode) "Clean \(?#...) comments within STRING for quoting, i.e. convert \\Q to Q and \\E to E. If EXTENDED-MODE is true, also clean diff --git a/doc/index.html b/doc/index.html index 89e5096..3277cb6 100644 --- a/doc/index.html +++ b/doc/index.html @@ -2052,7 +2052,7 @@ read.