diff options
author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-04 20:31:08 +0200 |
---|---|---|
committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-05-04 20:31:08 +0200 |
commit | e9feadee56f66d34bf4711ff792d537b3e1b9f64 (patch) | |
tree | 45ba3163b472b72ae0bf2dd01be335ba2ee2fb4a /lisp/mastodon-toot.el | |
parent | 497c92aa55675b23b4a5f8a429f631795685482d (diff) |
remove old var-pitch-mode code
Diffstat (limited to 'lisp/mastodon-toot.el')
-rw-r--r-- | lisp/mastodon-toot.el | 10 |
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 |