feature/icomplete-vertical 9f6dfd8 12/20: Fix previous commit.

[Jimmy Aguilar Mena]

branch: feature/icomplete-vertical
commit 9f6dfd813b846e49ee9119301928d2e47ee04eb3
Author: Jimmy Aguilar Mena <spacibba@aol.com>
Commit: Jimmy Aguilar Mena <spacibba@aol.com>

    Fix previous commit.
---
 lisp/icomplete.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/icomplete.el b/lisp/icomplete.el
index 3d6e649..ac5efc9 100644
--- a/lisp/icomplete.el
+++ b/lisp/icomplete.el
@@ -516,7 +516,7 @@ Conditions are:
     map)
   "Keymap used by `fido-mode' and `icomplete-mode' in 
`icomplete-vertical-mode'.")
 
-(defun icomplete--vertical-get-max-height ()
+(defun icomplete--vertical-get-max-height (line-height)
   (let ((minibuffer-parameter (frame-parameter nil 'minibuffer)))
     (cond
      ((eq minibuffer-parameter t)
@@ -540,7 +540,7 @@ Conditions are:
                           (string-prefix-p prefix most t)
                           (length prefix)))
          (line-height (line-pixel-height))
-         (prospects-max-height icomplete--vertical-get-max-height)
+         (prospects-max-height (icomplete--vertical-get-max-height 
line-height))
          ;; prompt + row new line around match
          (prospects-rows-pixel (* (1+ (cl-count ?\n match-braket)) 
line-height))
          limit prospects comp)