diff options
author | Jani Nikula <jani@nikula.org> | 2012-06-05 18:42:51 +0300 |
---|---|---|
committer | David Bremner <bremner@debian.org> | 2012-06-07 23:28:17 -0300 |
commit | 0ff57e75cf5847d2cbef97a49badb4cccc618300 (patch) | |
tree | ddbf635879b304abadaa276ba32522c26315cf8f | |
parent | 627f7b27f9756287795343cbb8a3137f74efccf9 (diff) |
emacs: only strip "re:" in the beginning of subject
Fix notmuch-show-strip-re by matching "re:" only in the beginning of
the input string.
-rw-r--r-- | emacs/notmuch-show.el | 2 | ||||
-rwxr-xr-x | test/emacs-show | 1 |
2 files changed, 1 insertions, 2 deletions
diff --git a/emacs/notmuch-show.el b/emacs/notmuch-show.el index d318430..36cad93 100644 --- a/emacs/notmuch-show.el +++ b/emacs/notmuch-show.el @@ -819,7 +819,7 @@ message at DEPTH in the current thread." (make-symbol (concat "notmuch-show-" type))) (defun notmuch-show-strip-re (string) - (replace-regexp-in-string "\\([Rr]e: *\\)+" "" string)) + (replace-regexp-in-string "^\\([Rr]e: *\\)+" "" string)) (defvar notmuch-show-previous-subject "") (make-variable-buffer-local 'notmuch-show-previous-subject) diff --git a/test/emacs-show b/test/emacs-show index 1ddb28e..e9a714f 100755 --- a/test/emacs-show +++ b/test/emacs-show @@ -33,7 +33,6 @@ output=$(test_emacs '(notmuch-show-strip-re "re:Re: re: Re: re:subject")') test_expect_equal "$output" '"subject"' test_begin_subtest "Bare subject #3" -test_subtest_known_broken output=$(test_emacs '(notmuch-show-strip-re "the cure: fix the regexp")') test_expect_equal "$output" '"the cure: fix the regexp"' |