diff options
| author | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-06-15 14:24:05 +0200 |
|---|---|---|
| committer | marty hiatt <martianhiatus [a t] riseup [d o t] net> | 2023-06-15 14:24:05 +0200 |
| commit | fec34bf00faf37b757bf6393c3042159b2fefe13 (patch) | |
| tree | 9fdf1bb96b31cb62661656bd8ccb799199cb8b0d | |
| parent | bc5ae8643130f55df84da9e07b5e292888d68770 (diff) | |
handle nil value in poll expires_at attr.
| -rw-r--r-- | lisp/mastodon-tl.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/mastodon-tl.el b/lisp/mastodon-tl.el index 4d49dea..c947807 100644 --- a/lisp/mastodon-tl.el +++ b/lisp/mastodon-tl.el @@ -1123,7 +1123,9 @@ LONGEST-OPTION is the option whose length determines the formatting." "")) 'face 'font-lock-comment-face) (let ((str (if (eq .expired :json-false) - (mastodon-tl--format-poll-expiry .expires_at) + (if (eq .expires_at nil) + "" + (mastodon-tl--format-poll-expiry .expires_at)) "Poll expired."))) (propertize str 'face 'font-lock-comment-face)) "\n")))) |