diff options
author | Juri Linkov <juri@jurta.org> | 2005-12-16 19:08:42 +0000 |
---|---|---|
committer | Juri Linkov <juri@jurta.org> | 2005-12-16 19:08:42 +0000 |
commit | fddf97f6cbbc852a3620a311a3727d473507234a (patch) | |
tree | 1206c4ce1c056cb538788b847bd5968a179138f5 /lisp/complete.el | |
parent | 6cdd02110f87f869ab39f1cc34a1042404a5abbe (diff) | |
download | emacs-fddf97f6cbbc852a3620a311a3727d473507234a.tar.gz |
(PC-do-completion): Remove `(equal (point) beg)' to
place point at the first different character in the minibuffer
even if this position is at the beginning of the minibuffer.
Diffstat (limited to 'lisp/complete.el')
-rw-r--r-- | lisp/complete.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/complete.el b/lisp/complete.el index 7de670f793c..cde669a943f 100644 --- a/lisp/complete.el +++ b/lisp/complete.el @@ -209,7 +209,7 @@ Partial Completion mode extends the meaning of `completion-auto-help' (which see), so that if it is neither nil nor t, Emacs shows the `*Completions*' buffer only on the second attempt to complete. That is, if TAB finds nothing to complete, the first TAB just says \"Next char not unique\" and the -second TAB brings up the `*Completionsf'* buffer." +second TAB brings up the `*Completions*' buffer." :global t :group 'partial-completion ;; Deal with key bindings... (PC-bindings partial-completion-mode) @@ -612,8 +612,7 @@ of `minibuffer-completion-table' and the minibuffer contents.") (insert (substring prefix i (1+ i))) (setq end (1+ end))) (setq i (1+ i))) - (or pt (equal (point) beg) - (setq pt (point))) + (or pt (setq pt (point))) (looking-at PC-delim-regex)) (setq skip (concat skip (regexp-quote prefix) |