From: ari <ari>
Date: Tue, 10 Apr 2001 18:11:00 +0000 (+0000)
Subject: * std11.el (std11-lexical-analyze): Fix typo.
X-Git-Tag: flim-1_14-rfc2231-merged~9
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=e862e4f01afeb424207992752edbf563bfdc6acc;p=elisp%2Fflim.git

* std11.el (std11-lexical-analyze): Fix typo.
---

diff --git a/ChangeLog b/ChangeLog
index 5695305..f33730f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2001-04-11  Akihiro Arisawa  <ari@mbf.sphere.ne.jp>
+
+	* std11.el (std11-lexical-analyze): Fix typo.
+
 2001-03-19  Shuhei KOBAYASHI  <shuhei@aqua.ocn.ne.jp>
 
 	* hmac-md5.el, hmac-sha1.el: Revert to load-time check.
diff --git a/std11.el b/std11.el
index 051d45a..97f9359 100644
--- a/std11.el
+++ b/std11.el
@@ -396,7 +396,7 @@ be the result."
 			  (null (setq r (funcall func string start))))
 		(setq rest (cdr rest)))
 	      (or r
-		  (list (cons 'error (substring string start)) (1+ len)))
+		  (cons (cons 'error (substring string start)) (1+ len)))
 	      ))
       (setq dest (cons (car ret) dest)
 	    start (cdr ret))