Lines Matching +defs:replace +defs:regexp
99 (defvar mh-pick-regexp-chars ".*$["
104 "Quote `mh-pick-regexp-chars' in PICK-EXPR.
110 (loop for i from 0 to (1- (length mh-pick-regexp-chars)) do
111 (let ((s (string ?\\ (aref mh-pick-regexp-chars i))))
112 (setq string (mh-replace-regexp-in-string s s string t t))))
117 (defun mh-replace-string (old new)
123 (replace-match new t t))))
356 (cond ((looking-at (mh-scan-msg-number-regexp))
456 (setq folder (replace-match "/" nil t folder)))
527 (setq folder (mh-replace-regexp-in-string "^\+" "" folder))
528 (setq folder (mh-replace-regexp-in-string "/+$" "" folder))
744 (defvar completion-root-regexp) ; XEmacs
752 (let ((completion-root-regexp "^[+/]")
922 (while (re-search-forward mh-letter-header-field-regexp nil t)
957 (re-search-backward mh-letter-header-field-regexp nil t)))
1016 (re-search-forward mh-signature-separator-regexp nil t)))