aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJani Nikula <jani@nikula.org>2012-06-05 18:42:51 +0300
committerDavid Bremner <bremner@debian.org>2012-06-07 23:28:17 -0300
commit0ff57e75cf5847d2cbef97a49badb4cccc618300 (patch)
treeddbf635879b304abadaa276ba32522c26315cf8f
parent627f7b27f9756287795343cbb8a3137f74efccf9 (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.el2
-rwxr-xr-xtest/emacs-show1
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"'