On Wed, Jul 06 2016, Mark Walters <markwalters1009@gmail.com> wrote: > 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. The change looks good to me -- but I just don't understand why someone would set notmuch-wash-wrap-lines-length to something else than nil -- and if it is set to some number what the behaviour should be ? Tomi > > 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 > > _______________________________________________ > notmuch mailing list > notmuch@notmuchmail.org > https://notmuchmail.org/mailman/listinfo/notmuch