X-Git-Url: https://git.notmuchmail.org/git?a=blobdiff_plain;f=emacs%2Fnotmuch-wash.el;h=c4a7a4103726dddbea1e8ebb439180608e615a37;hb=26b4cc4aad93e25dab1e1f38f19f1ae69cde389c;hp=bf0a3544d0cf82f38d256afac9a852901722ff43;hpb=43423e9c88e2c054ecd8328e82837867121af281;p=notmuch diff --git a/emacs/notmuch-wash.el b/emacs/notmuch-wash.el index bf0a3544..c4a7a410 100644 --- a/emacs/notmuch-wash.el +++ b/emacs/notmuch-wash.el @@ -23,7 +23,7 @@ (require 'coolj) -(declare-function notmuch-show-insert-bodypart "notmuch-show" (msg part depth) +(declare-function notmuch-show-insert-bodypart "notmuch-show" (msg part depth)) ;; @@ -145,7 +145,7 @@ is what to put on the button." (re-search-forward notmuch-wash-signature-regexp nil t)) (let* ((sig-start (match-beginning 0)) (sig-end (match-end 0)) - (sig-lines (1- (count-lines sig-start (point-max))))) + (sig-lines (count-lines sig-start (point-max)))) (if (<= sig-lines notmuch-wash-signature-lines-max) (let ((sig-start-marker (make-marker)) (sig-end-marker (make-marker))) @@ -190,7 +190,7 @@ is what to put on the button." (defun notmuch-wash-tidy-citations (depth) "Improve the display of cited regions of a message. -Perform four transformations on the message body: +Perform several transformations on the message body: - Remove lines of repeated citation leaders with no other content,