Function: comint-quote-filename

comint-quote-filename is a byte-compiled function defined in comint.el.gz.

Signature

(comint-quote-filename FILENAME)

Documentation

Return FILENAME with magic characters quoted.

Magic characters are those in comint-file-name-quote-list.

Aliases

pcomplete-quote-argument (obsolete since 24.3)

Source Code

;; Defined in /usr/src/emacs/lisp/comint.el.gz
(defun comint-quote-filename (filename)
  "Return FILENAME with magic characters quoted.
Magic characters are those in `comint-file-name-quote-list'."
  (if (null comint-file-name-quote-list)
      filename
    (let ((regexp (regexp-opt-charset comint-file-name-quote-list)))
      (save-match-data
	(let ((i 0))
	  (while (string-match regexp filename i)
	    (setq filename (replace-match "\\\\\\&" nil nil filename))
	    (setq i (1+ (match-end 0)))))
	filename))))