X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=elpher.git;a=blobdiff_plain;f=elpher.el;h=0cd846a4bd4c29936fddd65a80e8b415ddd26b7e;hp=e4d0e6e882989d1c0155b6847db8c7db4d3a9348;hb=7e6b71d0cf4ccf5d94a95c58fc35ebf2fd09920b;hpb=7a7fc41273acf74bf2982a9607cf066c15f875d7

diff --git a/elpher.el b/elpher.el
index e4d0e6e..0cd846a 100644
--- a/elpher.el
+++ b/elpher.el
@@ -1133,7 +1133,11 @@ If ADDRESS is not supplied or nil the record is rendered as an
                (window (get-buffer-window elpher-buffer-name)))
           (when window
             (setf (image-property image :max-width) (window-pixel-width window))
-            (setf (image-property image :max-height) (window-pixel-height window)))
+            (setf (image-property image :max-height) (- (window-pixel-height window)
+							(window-header-line-height window)
+							(window-mode-line-height window)
+							(window-scroll-bar-height window)
+							(window-bottom-divider-width window))))
           (elpher-with-clean-buffer
            (insert-image image)
            (elpher-restore-pos)))