From: Mark Walters Date: Sun, 9 Dec 2012 20:30:19 +0000 (+0000) Subject: contrib: pick: Do not indent messages in the message pane X-Git-Tag: 0.15_rc1~68 X-Git-Url: http://git.tremily.us/?a=commitdiff_plain;h=480f44fbe47a068626dbb7c7d9e9b1fb72a5da0f;p=notmuch.git contrib: pick: Do not indent messages in the message pane Currently pick just uses notmuch-show to display messages in the message pane: this means that they get indented just as show would. However, since pick is only displaying one message at a time there is no need to indent so override the indentation. --- diff --git a/contrib/notmuch-pick/notmuch-pick.el b/contrib/notmuch-pick/notmuch-pick.el index 9d3999bf..1a553d41 100644 --- a/contrib/notmuch-pick/notmuch-pick.el +++ b/contrib/notmuch-pick/notmuch-pick.el @@ -337,8 +337,10 @@ Does NOT change the database." (setq notmuch-pick-message-window (split-window-vertically (/ (window-height) 4))) (with-selected-window notmuch-pick-message-window - (setq current-prefix-arg '(4)) - (setq buffer (notmuch-show id nil nil nil))) + ;; Since we are only displaying one message do not indent. + (let ((notmuch-show-indent-messages-width 0)) + (setq current-prefix-arg '(4)) + (setq buffer (notmuch-show id nil nil nil)))) (notmuch-pick-tag-update-display (list "-unread")) (setq notmuch-pick-message-buffer buffer))))