Fix max-mini-window-lines not existing in old Emacsen (#3670)

clojure-emacs · May 17, 2024 · 1094e3d · 1094e3d
1 parent 6e89ad2
commit 1094e3d
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/cider-overlays.el b/cider-overlays.el
@@ -318,7 +318,8 @@ focused."
                            :duration cider-eval-result-duration
                            :prepend-face (or overlay-face 'cider-result-overlay-face))))
          (msg (format "%s%s" cider-eval-result-prefix value))
-         (max-msg-length (* (floor (max-mini-window-lines)) (frame-width)))
+         (max-msg-length (* (floor (* (frame-height) max-mini-window-height))
+                            (frame-width)))
          (msg (if (> (string-width msg) max-msg-length)
                   (format "%s..." (substring msg 0 (- max-msg-length 3)))
                 msg)))