[Emacs-diffs] Changes to emacs/lisp/minibuffer.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        08/04/14 03:30:47

Index: minibuffer.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/minibuffer.el,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -b -r1.9 -r1.10
--- minibuffer.el       13 Apr 2008 22:12:01 -0000      1.9
+++ minibuffer.el       14 Apr 2008 03:30:47 -0000      1.10
@@ -218,7 +218,7 @@
   (if (and (symbolp table) (get table 'no-completion-styles))
       (try-completion string table pred)
     (completion--some (lambda (style)
-                        (funcall (intern (concat style "try-completion"))
+                        (funcall (nth 1 (assq style completion-styles-alist))
                                  string table pred))
                       completion-styles)))
 
@@ -227,7 +227,7 @@
     (if (and (symbolp table) (get table 'no-completion-styles))
         (all-completions string table pred hide-spaces)
       (completion--some (lambda (style)
-                          (funcall (intern (concat style "all-completions"))
+                          (funcall (nth 2 (assq style completion-styles-alist))
                                    string table pred hide-spaces))
                         completion-styles))))