(icomplete-completions): Remove obsolete code.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9748486900a3ca2e81567f94ab01e028c0a8ea43..9066b0dfb57922b884c3d4e0a9d881f343808fb2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2008-03-11  Juanma Barranquero  <lekktu@gmail.com>
 
+       * icomplete.el (icomplete-completions): Remove obsolete code.
+
        * net/net-utils.el (iwconfig-program-options): Doc fix.
        (net-utils-run-program, run-network-program): Define as functions.
 

diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index 3eb4b4babf2531b3b4d057bcfae82176f9e89361..22ab96bb5914262d76e029aa52c2140d807fe2ba 100644 (file)
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -282,11 +282,6 @@ The displays for unambiguous matches have ` [Matched]' appended
 matches exist.  \(Keybindings for uniquely matched commands
 are exhibited within the square braces.)"
 
-  ;; 'all-completions' doesn't like empty
-  ;; minibuffer-completion-table's (ie: (nil))
-  (if (and (listp candidates) (null (car candidates)))
-      (setq candidates nil))
-
   (let ((comps (all-completions name candidates predicate))
                                         ; "-determined" - only one candidate
         (open-bracket-determined (if require-match "(" "["))