unofficial mirror of notmuch@notmuchmail.org
 help / color / mirror / code / Atom feed
* [PATCH] emacs: wash: make word-wrap bound message width
@ 2016-07-06  7:47 Mark Walters
  2016-08-20 20:08 ` Tomi Ollila
  0 siblings, 1 reply; 7+ messages in thread
From: Mark Walters @ 2016-07-06  7:47 UTC (permalink / raw)
  To: notmuch

Previously if notmuch-wash-wrap-lines-length was set then all messages
would be wrapped at this value (or window-width if that is
smaller). This was done regardless of the message's depth in a thread:
for example, if the n.w.w.l.l is 80 and the messages depth is 20
(so indented 20 by default) the messages text only got 60 characters
of space.

This commit changes that so a message always gets the full n.w.w.l.l
of width regardless of its indentation (unless that goes over
window-width of course).
---

This is what I would like -- I don't know if anyone would like to keep
the previous behaviour as an option. The code-part for that is easy, but getting
the docstrings and and defcustoms right is not clear.

Best wishes

Mark

emacs/notmuch-wash.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/emacs/notmuch-wash.el b/emacs/notmuch-wash.el
index 57e6dfa..e16b8cc 100644
--- a/emacs/notmuch-wash.el
+++ b/emacs/notmuch-wash.el
@@ -121,8 +121,8 @@ collapse the remaining lines into a button."
 
 If this is nil, lines in messages will be wrapped to fit in the
 current window. If this is a number, lines will be wrapped after
-this many characters or at the window width (whichever one is
-lower)."
+this many characters (ignoring indentation due to thread depth)
+or at the window width (whichever one is lower)."
   :type '(choice (const :tag "window width" nil)
 		 (integer :tag "number of characters"))
   :group 'notmuch-wash)
@@ -336,7 +336,7 @@ the wrapped text are maintained."
 
   (let* ((coolj-wrap-follows-window-size nil)
 	 (limit (if (numberp notmuch-wash-wrap-lines-length)
-		    (min notmuch-wash-wrap-lines-length
+		    (min (+ notmuch-wash-wrap-lines-length depth)
 			 (window-width))
 		  (window-width)))
 	 (fill-column (- limit
-- 
2.1.4

^ permalink raw reply related	[flat|nested] 7+ messages in thread

end of thread, other threads:[~2016-08-24 17:29 UTC | newest]

Thread overview: 7+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2016-07-06  7:47 [PATCH] emacs: wash: make word-wrap bound message width Mark Walters
2016-08-20 20:08 ` Tomi Ollila
2016-08-22  6:49   ` Mark Walters
2016-08-22 14:36     ` Tomi Ollila
2016-08-24  6:58       ` Mark Walters
2016-08-24 13:52         ` Tomi Ollila
2016-08-24 17:29           ` Mark Walters

Code repositories for project(s) associated with this public inbox

	https://yhetil.org/notmuch.git/

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).