diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-05-11 09:24:49 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2010-05-11 09:24:49 -0400 |
| commit | 8a67c70efbc12bf01237046b7d18c436a5cc82ac (patch) | |
| tree | 4c3030cde6a69a525f934f5a08336e0105a73fe9 /lisp/minibuffer.el | |
| parent | 4767419a31105c2a5077ca35263507c8e5991d8d (diff) | |
| download | emacs-8a67c70efbc12bf01237046b7d18c436a5cc82ac.tar.gz | |
* minibuffer.el (completion-pcm--pattern->regex): Fix last change.
Fixes: debbugs:6160
Diffstat (limited to 'lisp/minibuffer.el')
| -rw-r--r-- | lisp/minibuffer.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el index 869ce937b66..2f27cd0d40e 100644 --- a/lisp/minibuffer.el +++ b/lisp/minibuffer.el @@ -1835,8 +1835,8 @@ or a symbol chosen among `any', `star', `point', `prefix'." (lambda (x) (cond ((stringp x) (regexp-quote x)) - ((if (consp group) (memq x group) group) - "\\(.*?\\)" ".*?"))) + ((if (consp group) (memq x group) group) "\\(.*?\\)") + (t ".*?"))) pattern "")))) ;; Avoid pathological backtracking. |