Lines Matching +defs:replace +defs:regexp
37 ;; to replace its counterpart in Emacs 18. cmushell is more
69 ;; m-r comint-previous-matching-input Previous input matching a regexp
100 ;; comint-prompt-regexp is initialised to shell-prompt-pattern, for backwards
125 (defcustom shell-dumb-shell-regexp "cmd\\(proxy\\)?\\.exe"
128 match this regexp, Emacs will write out the command history when the
131 :type 'regexp
137 This variable is used to initialize `comint-prompt-regexp' in the
140 If `comint-use-prompt-regexp' is nil, then this variable is only used
149 :type 'regexp
190 '(comint-replace-by-expanded-history
193 shell-replace-by-expanded-directory
201 (defcustom shell-command-regexp "[^;&|\n]+"
204 :type 'regexp
207 (defcustom shell-command-separator-regexp "[;&|\n \t]*"
210 :type 'regexp
221 (defcustom shell-popd-regexp "popd"
223 :type 'regexp
226 (defcustom shell-pushd-regexp "pushd"
228 :type 'regexp
249 (defcustom shell-cd-regexp "cd"
251 :type 'regexp
254 (defcustom shell-chdrive-regexp
259 "If non-nil, is regexp used to track drive changes."
260 :type '(choice regexp
358 shell-replace-by-expanded-directory)
409 Variables `shell-cd-regexp', `shell-chdrive-regexp', `shell-pushd-regexp'
410 and `shell-popd-regexp' are used to match their respective commands,
428 (setq comint-prompt-regexp shell-prompt-pattern)
437 (setq paragraph-start comint-prompt-regexp)
466 (string-match shell-dumb-shell-regexp shell))
497 (replace-match "")))))
609 ;; replace it with a process filter that watches for and strips out
621 See variables `shell-cd-regexp', `shell-chdrive-regexp', `shell-pushd-regexp',
622 and `shell-popd-regexp', while `shell-pushd-tohome', `shell-pushd-dextract',
630 (concat "^" shell-command-separator-regexp)
634 (while (string-match shell-command-regexp str start)
640 (cond ((string-match (concat "\\`\\(" shell-popd-regexp
644 ((string-match (concat "\\`\\(" shell-pushd-regexp
648 ((string-match (concat "\\`\\(" shell-cd-regexp
652 ((and shell-chdrive-regexp
653 (string-match (concat "\\`\\(" shell-chdrive-regexp
657 (setq start (progn (string-match shell-command-separator-regexp
668 (if (string-match shell-dumb-shell-regexp
676 (setq string (replace-match "" nil nil string))
679 (setq string (replace-match "" nil nil string))
685 (setq string (replace-match "" nil nil string)))))
816 (regexp
820 (concat "\\(" (regexp-quote shell-dirstack-query) "\n\\)")
826 (while (not (looking-at regexp))
836 ;; regexp = optional whitespace, (non-whitespace), optional whitespace
915 See `shell-command-regexp'."
918 (if (re-search-forward (concat shell-command-regexp "\\([;&|][\t ]*\\)+")
925 See `shell-command-regexp'."
932 (format "[;&|]+[\t ]*\\(%s\\)" shell-command-regexp) limit 'move arg)
966 (mapconcat (function (lambda (x) (concat (regexp-quote x) "$")))
1058 (defun shell-replace-by-expanded-directory ()
1080 (replace-match (file-name-as-directory (nth index stack)) t t)