Commit 31d24a4b authored by Johan Bockgård's avatar Johan Bockgård
Browse files

(PC-do-completion): Use regexp-quote.

parent 920fb2b0
2008-03-26 Johan Bockg$(Q)[(Brd <>
* complete.el (PC-do-completion): Use regexp-quote.
2008-03-26 Dan Nicolaescu <>
* vc-cvs.el (vc-cvs-parse-status, vc-cvs-after-dir-status): Detect
......@@ -621,8 +621,10 @@ GOTO-END is non-nil, however, it instead replaces up to END."
(match-string 2 str)
p (1+ (length (match-string 1 str))))))
(setq regex (concat "\\`" (mapconcat #'list str "[^-]*-"))
p 1))))
(setq regex (concat "\\`" (mapconcat (lambda (c)
(regexp-quote (string c)))
str "[^-]*-"))
p 1))))
(when p
;; Use all-completions to do an initial cull. This is a big win,
;; since all-completions is written in C!
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