diff options
Diffstat (limited to 'elisp/geiser-log.el')
| -rw-r--r-- | elisp/geiser-log.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/elisp/geiser-log.el b/elisp/geiser-log.el index e542042..6444335 100644 --- a/elisp/geiser-log.el +++ b/elisp/geiser-log.el @@ -53,6 +53,12 @@ ;;; Log buffer and mode: +(defvar geiser-messages-mode-map + (let ((map (make-sparse-keymap))) + (define-key map "c" 'geiser-log-clear) + (define-key map "Q" 'geiser-log--deactivate) + map)) + (define-derived-mode geiser-messages-mode fundamental-mode "Geiser Messages" "Simple mode for Geiser log messages buffer." (buffer-disable-undo) @@ -126,8 +132,5 @@ With prefix, activates all logging levels." (setq geiser-log-verbose-p nil) (when (eq (current-buffer) (geiser-log--buffer)) (View-quit))) -(define-key geiser-messages-mode-map "c" 'geiser-log-clear) -(define-key geiser-messages-mode-map "Q" 'geiser-log--deactivate) - (provide 'geiser-log) |