From: Chong Yidong <cyd@stupidchicken.com>
Date: Thu, 21 Aug 2008 17:28:58 +0000 (+0000)
Subject: (completion--try-word-completion): Disable partial-completion when
X-Git-Tag: emacs-pretest-23.0.90~3372
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4b6f7dc970e8aeff7106e4c7f38404277e6eba3f;p=emacs.git

(completion--try-word-completion): Disable partial-completion when
considering the addition of a space or hyphen.
---

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index d33bd5f9836..a59fac6d556 100644
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -615,14 +615,9 @@ input if confirmed."
         (let ((exts '(" " "-"))
               (before (substring string 0 point))
               (after (substring string point))
-              ;; If the user hasn't entered any text yet, then she
-              ;; presumably hits SPC to see the *completions*, but
-              ;; partial-completion will often find a " " or a "-" to match.
-              ;; So disable partial-completion in that situation.
-              (completion-styles
-               (or (and (equal string "")
-                        (remove 'partial-completion completion-styles))
-                   completion-styles))
+	      ;; Disable partial-completion for this.
+	      (completion-styles
+	       (remove 'partial-completion completion-styles))
 	      tem)
 	  (while (and exts (not (consp tem)))
             (setq tem (completion-try-completion