summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--pancake.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/pancake.el b/pancake.el
index 691c01a..52021cf 100644
--- a/pancake.el
+++ b/pancake.el
@@ -375,7 +375,8 @@ use. Current window width is used if none is provided."
;; Not using `pancake-process-send' here, since it itself would call
;; this function.
(process-send-string pancake-process
- (format "set width %d\n" (or width (window-width)))))
+ (format "set width %d\n"
+ (or width (1- (window-width))))))
(defun pancake-process-send (line)
"Send LINE to the pancake process."