diff options
| author | marty hiatt <martianhiatus@riseup.net> | 2024-03-12 17:48:49 +0100 |
|---|---|---|
| committer | marty hiatt <martianhiatus@riseup.net> | 2024-03-12 17:48:49 +0100 |
| commit | 4e19f18a1a6d5bd60673013751b4332be0ea445c (patch) | |
| tree | 5e7ecc5e3123e183b4283fcf968aada08239c921 /lisp/mastodon-views.el | |
| parent | 6935c9290278e8b14f518df6de883ca81930e439 (diff) | |
apply not cl-reduce to find longest item for padding
Diffstat (limited to 'lisp/mastodon-views.el')
| -rw-r--r-- | lisp/mastodon-views.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mastodon-views.el b/lisp/mastodon-views.el index d0f310b..e9e89c0 100644 --- a/lisp/mastodon-views.el +++ b/lisp/mastodon-views.el @@ -852,7 +852,7 @@ MISSKEY means the instance is a Misskey or derived server." IND is the optional indentation level to print at." (let* ((cars (mapcar (lambda (x) (symbol-name (car x))) response)) - (pad (1+ (cl-reduce #'max (mapcar #'length cars))))) + (pad (1+ (apply #'max (mapcar #'length cars))))) (while response (let ((el (pop response))) (cond |