diff --git a/lisp/mh-e/mh-show.el b/lisp/mh-e/mh-show.el
index ba972fc5b6204e973da8f663cb3faabc2a8ac9e2..7743a045d6d4de030fdd8f60a942107389d5af8c 100644
--- a/lisp/mh-e/mh-show.el
+++ b/lisp/mh-e/mh-show.el
@@ -148,7 +148,7 @@ displayed."
             (if (not clean-message-header)
                 (mh-start-of-uncleaned-message)))
         (mh-display-msg msg folder)))
-    (unless (if (fbound 'window-full-height-p)
+    (unless (if (fboundp 'window-full-height-p)
                 (window-full-height-p)
               (= (1+ (window-height)) (frame-height))) ; not vertically split
       (shrink-window (- (window-height) (or mh-summary-height