aboutsummaryrefslogtreecommitdiff
path: root/lisp/mastodon-toot.el
diff options
context:
space:
mode:
authormarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-05-04 20:31:08 +0200
committermarty hiatt <martianhiatus [a t] riseup [d o t] net>2023-05-04 20:31:08 +0200
commite9feadee56f66d34bf4711ff792d537b3e1b9f64 (patch)
tree45ba3163b472b72ae0bf2dd01be335ba2ee2fb4a /lisp/mastodon-toot.el
parent497c92aa55675b23b4a5f8a429f631795685482d (diff)
remove old var-pitch-mode code
Diffstat (limited to 'lisp/mastodon-toot.el')
-rw-r--r--lisp/mastodon-toot.el10
1 files changed, 0 insertions, 10 deletions
diff --git a/lisp/mastodon-toot.el b/lisp/mastodon-toot.el
index dd8d032..ec4a0d1 100644
--- a/lisp/mastodon-toot.el
+++ b/lisp/mastodon-toot.el
@@ -1701,8 +1701,6 @@ EDIT means we are editing an existing toot, not composing a new one."
(point-marker))))
(switch-to-buffer-other-window buffer)
(text-mode)
- (when mastodon-toot--enable-proportional-fonts-compose-buffer
- (variable-pitch-mode))
(mastodon-toot-mode t)
(setq mastodon-toot--visibility
(or (plist-get mastodon-profile-account-settings 'privacy)
@@ -1764,14 +1762,6 @@ EDIT means we are editing an existing toot, not composing a new one."
(lambda ()
(auto-fill-mode -1)))
-;; scale fixed-pitch docs relative to any possible variable pitch scaling set:
-(add-hook 'mastodon-toot-mode-hook
- (lambda ()
- (when mastodon-toot--enable-proportional-fonts-compose-buffer
- (let ((height (/ 1 (face-attribute 'variable-pitch :height))))
- (set-face-attribute 'mastodon-toot-docs-face nil
- :height height)))))
-
(define-minor-mode mastodon-toot-mode
"Minor mode to capture Mastodon toots."
:keymap mastodon-toot-mode-map