From 4fd9215cfc63aec20a0d46a14fc1da8e608cff72 Mon Sep 17 00:00:00 2001 From: Shane Mulligan Date: Thu, 15 Apr 2021 09:22:03 +1200 Subject: [PATCH] Thu 15 Apr 2021 09:22:03 --- pen-core.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/pen-core.el b/pen-core.el index b86b4d89e..fcd199b6f 100644 --- a/pen-core.el +++ b/pen-core.el @@ -6,7 +6,9 @@ (defun pen-preceding-text () (str (buffer-substring (point) (max 1 (- (point) 1000))))) -(defun pen-surrounding-text () +(defun pen-surrounding-text (&optional window-line-size) + (if (not window-line-size) + (setq window-line-size 20)) (str (buffer-substring (point) (max 1 (- (point) 1000)))))