Simplify unneeded condition.

* lisp/minibuffer.el (display-completion-list) : The function
completion--insert-string already has a condition for when completions
is nil.

diff --git a/lisp/minibuffer.el b/lisp/minibuffer.el
index d6d40d5b251c3746b468f0cca02e116711e6e6c8..46e7bf2fb05719b7ea5f2d592b977c4bd817f6c1 100644 (file)
--- a/lisp/minibuffer.el
+++ b/lisp/minibuffer.el
@@ -2145,10 +2145,9 @@ candidates."
 
     (with-current-buffer standard-output
       (goto-char (point-max))
-      (when completions
-        (when completion-header-format
-          (insert (format completion-header-format (length completions))))
-        (completion--insert-strings completions group-fun))))
+      (when completion-header-format
+        (insert (format completion-header-format (length completions))))
+      (completion--insert-strings completions group-fun)))
 
   (run-hooks 'completion-setup-hook)
   nil)