mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-01-30 04:10:54 -08:00
* lisp/icomplete.el (icomplete-completions): Make sure the prefix is already
displayed elsewhere before hiding it.
This commit is contained in:
parent
660efa1a14
commit
aa2bddd73d
2 changed files with 25 additions and 17 deletions
|
|
@ -1,3 +1,8 @@
|
|||
2013-12-14 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
* icomplete.el (icomplete-completions): Make sure the prefix is already
|
||||
displayed elsewhere before hiding it.
|
||||
|
||||
2013-12-14 Dmitry Gutov <dgutov@yandex.ru>
|
||||
|
||||
* progmodes/ruby-mode.el (ruby-smie-rules): Return nil before
|
||||
|
|
@ -9,12 +14,11 @@
|
|||
2013-12-13 Teodor Zlatanov <tzz@lifelogs.com>
|
||||
|
||||
* progmodes/cfengine.el: Fix `add-hook' doc.
|
||||
(cfengine-mode-syntax-functions-regex):
|
||||
Initialize sensibly.
|
||||
(cfengine-mode-syntax-functions-regex): Initialize sensibly.
|
||||
(cfengine3--current-word): Fix parameters.
|
||||
(cfengine3-make-syntax-cache): Simplify further.
|
||||
(cfengine3-completion-function, cfengine3--current-function): Use
|
||||
`assq' for symbols.
|
||||
(cfengine3-completion-function, cfengine3--current-function):
|
||||
Use `assq' for symbols.
|
||||
(cfengine3--current-function): Fix `cfengine3--current-word' call.
|
||||
|
||||
2013-12-13 Glenn Morris <rgm@gnu.org>
|
||||
|
|
@ -31,8 +35,8 @@
|
|||
cf-promises doesn't run.
|
||||
(cfengine3--current-word): Reimplement using
|
||||
`cfengine-mode-syntax-functions-regex'.
|
||||
(cfengine3-completion-function, cfengine3--current-function): Use
|
||||
`cfengine3-make-syntax-cache' directly.
|
||||
(cfengine3-completion-function, cfengine3--current-function):
|
||||
Use `cfengine3-make-syntax-cache' directly.
|
||||
(cfengine3-clear-syntax-cache): New function.
|
||||
(cfengine3-make-syntax-cache): Simplify and create
|
||||
`cfengine-mode-syntax-functions-regex' on demand.
|
||||
|
|
@ -85,8 +89,8 @@
|
|||
|
||||
2013-12-12 Fabián Ezequiel Gallina <fgallina@gnu.org>
|
||||
|
||||
* progmodes/python.el (python-indent-calculate-indentation): Fix
|
||||
de-denters cornercase. (Bug#15731)
|
||||
* progmodes/python.el (python-indent-calculate-indentation):
|
||||
Fix de-denters cornercase. (Bug#15731)
|
||||
|
||||
2013-12-12 Stefan Monnier <monnier@iro.umontreal.ca>
|
||||
|
||||
|
|
|
|||
|
|
@ -416,18 +416,22 @@ are exhibited within the square braces.)"
|
|||
;; one line, increase the allowable space accordingly.
|
||||
(/ prospects-len (window-width)))
|
||||
(window-width)))
|
||||
;; Find the common prefix among `comps'.
|
||||
;; We can't use the optimization below because its assumptions
|
||||
;; aren't always true, e.g. when completion-cycling (bug#10850):
|
||||
;; (if (eq t (compare-strings (car comps) nil (length most)
|
||||
;; most nil nil completion-ignore-case))
|
||||
;; ;; Common case.
|
||||
;; (length most)
|
||||
;; Else, use try-completion.
|
||||
(prefix (when icomplete-hide-common-prefix
|
||||
(try-completion "" comps)))
|
||||
(prefix-len
|
||||
;; Find the common prefix among `comps'.
|
||||
;; We can't use the optimization below because its assumptions
|
||||
;; aren't always true, e.g. when completion-cycling (bug#10850):
|
||||
;; (if (eq t (compare-strings (car comps) nil (length most)
|
||||
;; most nil nil completion-ignore-case))
|
||||
;; ;; Common case.
|
||||
;; (length most)
|
||||
;; Else, use try-completion.
|
||||
(and (stringp prefix) (length prefix))) ;;)
|
||||
(and (stringp prefix)
|
||||
;; Only hide the prefix if the corresponding info
|
||||
;; is already displayed via `most'.
|
||||
(string-prefix-p prefix most t)
|
||||
(length prefix))) ;;)
|
||||
prospects comp limit)
|
||||
(if (or (eq most-try t) (not (consp (cdr comps))))
|
||||
(setq prospects nil)
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue