Commit 7eb47123 authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(split-string): Fix minor bug.

parent f41c4842
......@@ -789,7 +789,7 @@ If SEPARATORS is absent, it defaults to \"[ \\f\\t\\n\\r\\v]+\"."
(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))
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