diff lisp/subr.el @ 16333:585956e62c87

(split-string): Fix minor bug.
author Richard M. Stallman <rms@gnu.org>
date Wed, 25 Sep 1996 22:35:17 +0000
parents c72b7ee606a3
children 18cc78dc8b18
line wrap: on
line diff
--- a/lisp/subr.el	Wed Sep 25 09:53:56 1996 +0000
+++ b/lisp/subr.el	Wed Sep 25 22:35:17 1996 +0000
@@ -789,7 +789,7 @@
 	(start 0)
 	(list nil))
     (while (string-match rexp string start)
-      (or (eq start 0)
+      (or (eq (match-beginning 0) 0)
 	  (setq list
 		(cons (substring string start (match-beginning 0))
 		      list)))