From a6c75aeb7ab8a7a9879aa5b1e17ffec4c18d446a Mon Sep 17 00:00:00 2001 From: defanor Date: Fri, 15 Dec 2017 17:03:18 +0300 Subject: Decrease window width by 1 in `pancake-width-adjust' Take the continuation glyph column into account. --- pancake.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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." -- cgit v1.2.3