diff options
| author | Jakob L. Kreuze | 2022-10-23 18:43:53 -0400 |
|---|---|---|
| committer | Jakob L. Kreuze | 2022-10-23 18:44:19 -0400 |
| commit | 5be2f3fbe5e0d82a8a73a316dce3aaef2afa758e (patch) | |
| tree | e7e46f80e16cb4628eadac53997f5878e706a654 /lisp | |
| parent | 45f669055b0360db6dc2db8f3bf32b26c98500d4 (diff) | |
Fix warnings for baby-scroll-mode
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/core.el | 13 |
1 files changed, 10 insertions, 3 deletions
diff --git a/lisp/core.el b/lisp/core.el index 972291b..df40e60 100644 --- a/lisp/core.el +++ b/lisp/core.el @@ -191,13 +191,20 @@ line." ;; them to functions for scolling by one line at a time instead. Sometimes ;; useful when perusing IRC logs. +(defgroup baby-scroll () + "Minor mode for subtle scrolling commands." + :group 'convenience) + (define-minor-mode baby-scroll-mode "Toggle `baby-scroll-mode'. Minor mode which remaps <next> and <prior> to less extreme scrolling functions." - nil "Baby Scroll" '(([next] . scroll-up-line) - ([prior] . scroll-down-line)) - :global t) + :global t + :lighter "Baby Scroll" + :group 'baby-scroll + :keymap '(([next] . scroll-up-line) + ([prior] . scroll-down-line)) + nil) (baby-scroll-mode) |