• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.9.5/emacs-92/emacs/lisp/net/

Lines Matching +defs:prefix +defs:re

162 ;;    this directory plus an identifying filename prefix.  For example:
428 ;; ange-ftp-bs2000-special-prefix because names starting with # or @
656 ;; Thanks to Sandy Rutherford who re-wrote most of ange-ftp to support VMS,
689 :prefix "ange-ftp-")
785 Files starting with this prefix need to be accessible from BOTH the local
810 and password information for that host are cached and re-used by
1352 (if (re-search-forward "machine\\>\\|default\\>" nil t)
1931 (if (re-search-forward "Name:.*\nAddress: *\\(.*\\)$" nil t)
2348 ;; If we're trying to `ls' a single file, this fails since we
2438 (defconst ange-ftp-bs2000-filename-prefix-regexp
2442 "Valid prefix for an BS2000 file name (pubset and user).")
2444 (concat "^" ange-ftp-bs2000-filename-prefix-regexp "$"))
2646 (while (re-search-forward "\r$" nil t)
2723 (if (re-search-forward directory-listing-before-filename-regexp eol t)
2839 ((re-search-forward directory-listing-before-filename-regexp nil t)
2842 ((re-search-forward "^[^ \n\t]+ +\\([0-9]+\\|-\\|=\\) " nil t)
3119 ;; making it absolute then re-expand it.
3136 ;; relative name. Tack on homedir and re-expand.
3606 ;;;; File copying support... totally re-written 6/24/92.
4061 ;;(define-key minibuffer-local-completion-map "\C-r" 'ange-ftp-re-read-dir)
4062 ;;(define-key minibuffer-local-must-match-map "\C-r" 'ange-ftp-re-read-dir)
4065 (defalias 'ange-ftp-re-read-dir 'ange-ftp-reread-dir)
4503 ;; If `full' is nil we're going to do `ls' for a single file.
4816 ;;(defconst ange-ftp-dired-dl-re-dir
4820 ;;(or (assq 'unix:dl ange-ftp-dired-re-dir-alist)
4821 ;; (setq ange-ftp-dired-re-dir-alist
4822 ;; (cons (cons 'unix:dl ange-ftp-dired-dl-re-dir)
4823 ;; ange-ftp-dired-re-dir-alist)))
4932 ; (if (re-search-forward type-regexp nil t)
5049 (if (re-search-forward
5191 ;;(defconst ange-ftp-dired-vms-re-exe "^. [^ \t.]+\\.\\(EXE\\|exe\\)[; ]"
5194 ;;(defconst ange-ftp-dired-vms-re-dir "^. [^ \t.]+\\.\\(DIR\\|dir\\)[; ]"
5197 ;;(or (assq 'vms ange-ftp-dired-re-exe-alist)
5198 ;; (setq ange-ftp-dired-re-exe-alist
5199 ;; (cons (cons 'vms ange-ftp-dired-vms-re-exe)
5200 ;; ange-ftp-dired-re-exe-alist)))
5202 ;;(or (assq 'vms ange-ftp-dired-re-dir-alist)
5203 ;; (setq ange-ftp-dired-re-dir-alist
5204 ;; (cons (cons 'vms ange-ftp-dired-vms-re-dir)
5205 ;; ange-ftp-dired-re-dir-alist)))
5232 ;; (if (re-search-forward ange-ftp-vms-filename-regexp eol t)
5256 ;; (re-search-forward ange-ftp-vms-filename-regexp eol t))
5321 ;; (re-search-forward ange-ftp-vms-filename-regexp))
5353 ;;Positive prefix arg KEEP overrides `dired-kept-versions';
5354 ;;Negative prefix arg KEEP overrides `kept-old-versions' with KEEP made positive.
5357 ;;with a prefix argument."
5359 ;; (setq keep (max 1 (if keep (prefix-numeric-value keep) dired-kept-versions)))
5544 (while (re-search-forward directory-listing-before-filename-regexp nil t)
5584 ;; (if (re-search-forward
5775 (re-search-forward
5787 ;;(defconst ange-ftp-dired-cms-re-exe
5791 ;;(or (assq 'cms ange-ftp-dired-re-exe-alist)
5792 ;; (setq ange-ftp-dired-re-exe-alist
5793 ;; (cons (cons 'cms ange-ftp-dired-cms-re-exe)
5794 ;; ange-ftp-dired-re-exe-alist)))
5815 ;; (if (re-search-forward " [-A-Z0-9$_]+ +[-A-Z0-9$_]+ +[VF] +[0-9]+ " eol t)
5907 (defcustom ange-ftp-bs2000-special-prefix
5932 ;; interpret BS2000 pubsets as the special escape prefix:
5938 ;; of our prevention of the special escape prefix above:
5957 (setq filename (concat ange-ftp-bs2000-special-prefix
6035 "\\(" ange-ftp-bs2000-filename-prefix-regexp "\\)?"
6051 (if (re-search-forward ange-ftp-bs2000-filename-regexp nil t)
6062 (if (re-search-forward ange-ftp-bs2000-filename-pubset-regexp nil t)