branch: elpa/mastodon
commit 8e96dac8e3926bdb9ea859ce922d91ac8bf7ba14
Author: marty hiatt <[email protected]>
Commit: marty hiatt <[email protected]>
disable pixel scroll image mode in masto-image buffers
(so scrolling works)
---
lisp/mastodon-tl.el | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el
index b7a24d74ce9..59fef485d24 100644
--- a/lisp/mastodon-tl.el
+++ b/lisp/mastodon-tl.el
@@ -1487,7 +1487,9 @@ SENSITIVE is a flag from the item's JSON data."
(define-derived-mode mastodon-image-mode image-mode
"mastodon-image"
- :group 'mastodon)
+ :group 'mastodon
+ (if pixel-scroll-precision-mode
+ (pixel-scroll-precision-mode -1)))
;; patch `shr-browse-image' to accept url arg:
(defun mastodon-tl-shr-browse-image (&optional image-url copy-url)
