summaryrefslogtreecommitdiff
path: root/elisp/geiser-log.el
diff options
context:
space:
mode:
authorJonas Bernoulli <jonas@bernoul.li>2021-03-03 14:51:10 +0100
committerjao <jao@gnu.org>2021-03-07 05:18:38 +0000
commite366291e4aaacc17c98f8cd253a27ef9915f2bf5 (patch)
treec9815054fb8006ed08321677008eac716eb4883e /elisp/geiser-log.el
parentec460565831d206fc3109b82e3a4cb2db1fa7850 (diff)
downloadgeiser-e366291e4aaacc17c98f8cd253a27ef9915f2bf5.tar.gz
geiser-e366291e4aaacc17c98f8cd253a27ef9915f2bf5.tar.bz2
geiser-messages-mode: Don't quote lambda expressions
Diffstat (limited to 'elisp/geiser-log.el')
-rw-r--r--elisp/geiser-log.el18
1 files changed, 9 insertions, 9 deletions
diff --git a/elisp/geiser-log.el b/elisp/geiser-log.el
index 6444335..236f691 100644
--- a/elisp/geiser-log.el
+++ b/elisp/geiser-log.el
@@ -63,18 +63,18 @@
"Simple mode for Geiser log messages buffer."
(buffer-disable-undo)
(add-hook 'after-change-functions
- '(lambda (b e len)
- (let ((inhibit-read-only t))
- (when (> b geiser-log--max-buffer-size)
- (delete-region (point-min) b))))
+ (lambda (b e len)
+ (let ((inhibit-read-only t))
+ (when (> b geiser-log--max-buffer-size)
+ (delete-region (point-min) b))))
nil t)
;; Maybe this feature would better be implemented as a revert-buffer function?
(add-hook 'after-change-functions
- '(lambda (b e len)
- (when geiser-log-autoscroll-buffer-p
- (let ((my-window (get-buffer-window (geiser-log--buffer) t)))
- (when (window-live-p my-window)
- (set-window-point my-window (point))))))
+ (lambda (b e len)
+ (when geiser-log-autoscroll-buffer-p
+ (let ((my-window (get-buffer-window (geiser-log--buffer) t)))
+ (when (window-live-p my-window)
+ (set-window-point my-window (point))))))
nil t)
(setq buffer-read-only t))