debian/notmuch
1
0
Fork 0
mirror of https://git.notmuchmail.org/git/notmuch synced 2024-12-22 09:24:54 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

emacs: Fix the notmuch-search-authors-width variable.

Browse source 
This variable existed previously, but wasn't actually used for anything.
This commit is contained in:
Carl Worth 2010-03-11 15:04:17 -08:00
parent e002fe8a7a
commit b957a1b029
2 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
emacs/notmuch.el
View file

@ -1213,7 +1213,7 @@ matching this search term are shown if non-nil. "
(notmuch-show-next-open-message)) (notmuch-show-next-open-message))
))) )))
(defvar notmuch-search-authors-width 40 (defvar notmuch-search-authors-width 20
"Number of columns to use to display authors in a notmuch-search buffer.") "Number of columns to use to display authors in a notmuch-search buffer.")
(defvar notmuch-search-mode-map (defvar notmuch-search-mode-map
@ -1507,11 +1507,12 @@ This function advances the next thread when finished."
(authors-length (length authors)) (authors-length (length authors))
(subject (match-string 5 string)) (subject (match-string 5 string))
(tags (match-string 6 string))) (tags (match-string 6 string)))
(if (> authors-length 40) (if (> authors-length notmuch-search-authors-width)
(set 'authors (concat (substring authors 0 (- 40 3)) "..."))) (set 'authors (concat (substring authors 0 (- notmuch-search-authors-width 3)) "...")))
(goto-char (point-max)) (goto-char (point-max))
(let ((beg (point-marker))) (let ((beg (point-marker))
(insert (format "%s %-7s %-40s %s (%s)\n" date count authors subject tags)) (format-string (format "%%s %%-7s %%-%ds %%s (%%s)\n" notmuch-search-authors-width)))
(insert (format format-string date count authors subject tags))
(put-text-property beg (point-marker) 'notmuch-search-thread-id thread-id) (put-text-property beg (point-marker) 'notmuch-search-thread-id thread-id)
(put-text-property beg (point-marker) 'notmuch-search-authors authors) (put-text-property beg (point-marker) 'notmuch-search-authors authors)
(put-text-property beg (point-marker) 'notmuch-search-subject subject) (put-text-property beg (point-marker) 'notmuch-search-subject subject)

1
lib/thread.cc
View file

@ -278,7 +278,6 @@ _notmuch_thread_create (void *ctx,
} }
notmuch_query_destroy (thread_id_query); notmuch_query_destroy (thread_id_query);
for (messages = notmuch_query_search_messages (matched_query); for (messages = notmuch_query_search_messages (matched_query);
notmuch_messages_valid (messages); notmuch_messages_valid (messages);
notmuch_messages_move_to_next (messages)) notmuch_messages_move_to_next (messages))