notmuch-hello: Fix a sign error when computing number of padding spaces.

After the previous commit, toggling the visibility of tags could
result in notmuch-hello aborting with:

	Wrong type argument: wholenump, -1

At least, the error only occurred for me when making tags visible. But
that may be because my longest tag name is longer than my longest
saved-search name.
This commit is contained in:
Carl Worth 2010-04-26 20:51:31 -07:00
parent ca5ae54cb1
commit 404c6121e5

View file

@ -174,7 +174,7 @@ diagonal."
:notify #'notmuch-hello-widget-search :notify #'notmuch-hello-widget-search
:notmuch-search-terms (cdr elem) :notmuch-search-terms (cdr elem)
(format "%s " (car elem))) (format "%s " (car elem)))
(insert (make-string (1- (- widest (length (car elem)))) ? ))) (insert (make-string (1+ (- widest (length (car elem)))) ? )))
(setq count (1+ count)) (setq count (1+ count))
(if (eq (% count tags-per-line) 0) (if (eq (% count tags-per-line) 0)
(widget-insert "\n")))) (widget-insert "\n"))))