It's shorter. That's it pretty much.
name)
(setq column-indent
(1+ (max 0 (- column-width (length name)))))))
name)
(setq column-indent
(1+ (max 0 (- column-width (length name)))))))
- (setq count (1+ count))
(when (eq (% count tags-per-line) 0)
(setq column-indent 0)
(widget-insert "\n")))
(when (eq (% count tags-per-line) 0)
(setq column-indent 0)
(widget-insert "\n")))
(i 0))
(while (< i (length prefix))
(aset prefix i (aref key i))
(i 0))
(while (< i (length prefix))
(aset prefix i (aref key i))
(let* ((subkeymap (key-binding prefix))
(ua-keys (where-is-internal 'universal-argument nil t))
(prefix-string (notmuch-prefix-key-description prefix))
(let* ((subkeymap (key-binding prefix))
(ua-keys (where-is-internal 'universal-argument nil t))
(prefix-string (notmuch-prefix-key-description prefix))