From dbbf6189edb3a7e883c9bb42ff0a7f812538b441 Mon Sep 17 00:00:00 2001 From: marty hiatt Date: Tue, 9 May 2023 20:19:32 +0200 Subject: small refactor of args at end of instances/rules fun --- lisp/mastodon-views.el | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el index 0dd74a3..16bcaa1 100644 --- a/lisp/mastodon-views.el +++ b/lisp/mastodon-views.el @@ -876,12 +876,9 @@ IND is the optional indentation level to print at." (insert (mastodon-views--format-key el pad) " " (mastodon-views--newline-if-long (cdr el)) - ;; only send strings straight to --render-text - ;; this makes hyperlinks work: - (if (not (stringp val)) - (mastodon-tl--render-text - (prin1-to-string val)) - (mastodon-tl--render-text val)) + ;; only send strings to --render-text (for hyperlinks): + (mastodon-tl--render-text + (if (stringp val) val (prin1-to-string val))) "\n")))))))) (defun mastodon-views--print-instance-rules-or-fields (alist) -- cgit v1.2.3