emacs-diffs
[Top][All Lists]
Advanced

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

[Emacs-diffs] emacs/lisp ChangeLog minibuffer.el


From: Glenn Morris
Subject: [Emacs-diffs] emacs/lisp ChangeLog minibuffer.el
Date: Wed, 02 Sep 2009 03:09:24 +0000

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       09/09/02 03:09:20

Modified files:
        lisp           : ChangeLog minibuffer.el 

Log message:
        (completion-initials-expand): Fix typo.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16084&r2=1.16085
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/minibuffer.el?cvsroot=emacs&r1=1.82&r2=1.83

Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16084
retrieving revision 1.16085
diff -u -b -r1.16084 -r1.16085
--- ChangeLog   1 Sep 2009 23:36:27 -0000       1.16084
+++ ChangeLog   2 Sep 2009 03:09:10 -0000       1.16085
@@ -1,3 +1,11 @@
+2009-09-02  Glenn Morris  <address@hidden>
+
+       * minibuffer.el (completion-initials-expand): Fix typo.
+
+       * faces.el (modeline, modeline-inactive, modeline-highlight)
+       (modeline-buffer-id):
+       * info.el (info-menu-5): Mark these face aliases as obsolete.
+
 2009-09-01  Nick Roberts  <address@hidden>
 
        * progmodes/gdb-mi.el (gdb-current-context-command): Move the

Index: minibuffer.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/minibuffer.el,v
retrieving revision 1.82
retrieving revision 1.83
diff -u -b -r1.82 -r1.83
--- minibuffer.el       1 Sep 2009 20:20:11 -0000       1.82
+++ minibuffer.el       2 Sep 2009 03:09:19 -0000       1.83
@@ -1771,7 +1771,7 @@
 
 (defun completion-initials-expand (str table pred)
   (unless (or (zerop (length str))
-              (string-match completion-pcm--delim-wild-regex string))
+              (string-match completion-pcm--delim-wild-regex str))
     (let ((bounds (completion-boundaries str table pred "")))
       (if (zerop (car bounds))
           (mapconcat 'string str "-")




reply via email to

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