summary refs log tree commit diff stats
diff options
context:
space:
mode:
-rw-r--r--config.org26
1 files changed, 26 insertions, 0 deletions
diff --git a/config.org b/config.org index 1263c8e..16b07e0 100644 --- a/config.org +++ b/config.org
@@ -1319,6 +1319,32 @@ of how /terrible/ it is to have them.
1319 1319
1320*** Visual fill column mode 1320*** Visual fill column mode
1321 1321
1322**** First: fix scrolling in margins
1323
1324This has to be done /before/ loading the package. It's included in
1325=visual-fill-column=, too, but for some reason isn't loaded there.
1326
1327#+BEGIN_SRC emacs-lisp
1328 (dolist (margin '(right-margin left-margin))
1329 (dolist (button '(mouse-1 mouse-2 mouse-3))
1330 (global-set-key (vector margin button)
1331 (global-key-binding (vector button)))))
1332
1333 (mouse-wheel-mode +1)
1334
1335 (when (bound-and-true-p mouse-wheel-mode)
1336 (dolist (margin '(right-margin left-margin))
1337 (dolist (event '(mouse-wheel-down-event
1338 mouse-wheel-up-event
1339 wheel-down
1340 wheel-up
1341 mouse-4
1342 mouse-5))
1343 (global-set-key (vector margin event) #'mwheel-scroll))))
1344#+END_SRC
1345
1346**** Then: =visual-fill-column= :package:
1347
1322In reading-intensive views, this mode keeps the text from getting too 1348In reading-intensive views, this mode keeps the text from getting too
1323wide. 1349wide.
1324 1350