emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/simple.el


From: Richard M . Stallman
Subject: [Emacs-diffs] Changes to emacs/lisp/simple.el
Date: Mon, 06 Jun 2005 08:40:40 -0400

Index: emacs/lisp/simple.el
diff -c emacs/lisp/simple.el:1.726 emacs/lisp/simple.el:1.727
*** emacs/lisp/simple.el:1.726  Sun Jun  5 17:19:55 2005
--- emacs/lisp/simple.el        Mon Jun  6 12:40:36 2005
***************
*** 4833,4839 ****
                    (- (point) (minibuffer-prompt-end)))))
        ;; Otherwise, in minibuffer, the whole input is being completed.
        (if (minibufferp mainbuf)
!           (setq completion-base-size 0)))
        ;; Put faces on first uncommon characters and common parts.
        (when completion-base-size
        (let* ((common-string-length
--- 4833,4843 ----
                    (- (point) (minibuffer-prompt-end)))))
        ;; Otherwise, in minibuffer, the whole input is being completed.
        (if (minibufferp mainbuf)
!           (if (and (symbolp minibuffer-completion-table)
!                    (get minibuffer-completion-table 
'completion-base-size-function))
!               (setq completion-base-size 
!                     (funcall (get minibuffer-completion-table 
'completion-base-size-function)))
!             (setq completion-base-size 0))))
        ;; Put faces on first uncommon characters and common parts.
        (when completion-base-size
        (let* ((common-string-length




reply via email to

[Prev in Thread] Current Thread [Next in Thread]