aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/mh-e
diff options
context:
space:
mode:
authorPhilipp Stephani2017-05-06 19:16:49 +0200
committerPhilipp2017-05-07 13:22:34 +0200
commit3c4c8ca06e3306ccbcd07e354eb51abe53b52d22 (patch)
tree01542b123bede1a9d6d9b05ec1dbf2089e9a76bd /lisp/mh-e
parentbcbd8f7e4e929604bb3dfef9937432cb05b5f648 (diff)
downloademacs-3c4c8ca06e3306ccbcd07e354eb51abe53b52d22.tar.gz
emacs-3c4c8ca06e3306ccbcd07e354eb51abe53b52d22.zip
Fix all unescaped character literals
Diffstat (limited to 'lisp/mh-e')
-rw-r--r--lisp/mh-e/mh-search.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mh-e/mh-search.el b/lisp/mh-e/mh-search.el
index 7ff35645bdd..b0fdfce8e87 100644
--- a/lisp/mh-e/mh-search.el
+++ b/lisp/mh-e/mh-search.el
@@ -1517,8 +1517,8 @@ construct the base name."
1517 (setq string (mh-replace-string "-lbrace" " ")) 1517 (setq string (mh-replace-string "-lbrace" " "))
1518 (setq string (mh-replace-string "-rbrace" " ")) 1518 (setq string (mh-replace-string "-rbrace" " "))
1519 (setq string (mh-replace-string "-search" " ")) 1519 (setq string (mh-replace-string "-search" " "))
1520 (subst-char-in-region (point-min) (point-max) ?( ? t) 1520 (subst-char-in-region (point-min) (point-max) ?\( ? t)
1521 (subst-char-in-region (point-min) (point-max) ?) ? t) 1521 (subst-char-in-region (point-min) (point-max) ?\) ? t)
1522 (subst-char-in-region (point-min) (point-max) ?- ? t) 1522 (subst-char-in-region (point-min) (point-max) ?- ? t)
1523 (goto-char (point-min)) 1523 (goto-char (point-min))
1524 (while (and (not (eobp)) (memq (char-after) '(? ?\t ?\n ?\r ?_))) 1524 (while (and (not (eobp)) (memq (char-after) '(? ?\t ?\n ?\r ?_)))