aboutsummaryrefslogtreecommitdiff
path: root/lisp
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
parent497c92aa55675b23b4a5f8a429f631795685482d (diff)
remove old var-pitch-mode code
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mastodon-toot.el10
-rw-r--r--lisp/mastodon.el4
2 files changed, 1 insertions, 13 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
diff --git a/lisp/mastodon.el b/lisp/mastodon.el
index f52579c..4662010 100644
--- a/lisp/mastodon.el
+++ b/lisp/mastodon.el
@@ -242,9 +242,7 @@ Use. e.g. \"%c\" for your locale's date and time format."
"Face used for content warning.")
(defface mastodon-toot-docs-face
- `((t :inherit font-lock-comment-face
- :height 1.0
- :family ,(face-attribute 'default :family)))
+ `((t :inherit font-lock-comment-face))
"Face used for documentation in toot compose buffer.
If `mastodon-tl--enable-proportional-fonts' is changed,
mastodon.el needs to be re-loaded for this to be correctly set.")