summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorCase Duckworth2021-02-23 12:50:29 -0600
committerCase Duckworth2021-02-23 12:50:29 -0600
commit9cfb29695942fec7d90f131c08707b4c958d3435 (patch)
treecceda5a589d1c7f900f211380a74a40bc24e9827
parentAdd ~/.gitconfig (diff)
downloademacs-9cfb29695942fec7d90f131c08707b4c958d3435.tar.gz
emacs-9cfb29695942fec7d90f131c08707b4c958d3435.zip
Fix scrolling in margins
I honestly probably need to tag my shit or something, because this
commit was /really/ hard to find.  Or hopefully, as I get more steady
with my Emacs config it'll be less volatile.
-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