comparison lisp/files.el @ 105965:3f64b8380468

* textmodes/ispell.el (ispell-skip-region-alist): * textmodes/css-mode.el (auto-mode-alist): * progmodes/compile.el (auto-mode-alist): * international/mule.el (ctext-non-standard-encodings-alist) (ctext-non-standard-encodings-regexp): * simple.el (shell-command-switch, text-read-only): * replace.el (occur-mode-map): * paths.el (rmail-file-name): * jka-cmpr-hook.el (jka-compr-build-file-regexp): * find-file.el (ff-special-constructs): * files.el (file-name-handler-alist): * composite.el: Purecopy strings.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 12 Nov 2009 06:55:39 +0000
parents 21f6a54627b6
children 009383a57ce8
comparison
equal deleted inserted replaced
105964:bedac8edf64d 105965:3f64b8380468
5943 5943
5944 ;; We use /: as a prefix to "quote" a file name 5944 ;; We use /: as a prefix to "quote" a file name
5945 ;; so that magic file name handlers will not apply to it. 5945 ;; so that magic file name handlers will not apply to it.
5946 5946
5947 (setq file-name-handler-alist 5947 (setq file-name-handler-alist
5948 (cons '("\\`/:" . file-name-non-special) 5948 (cons (cons (purecopy "\\`/:") 'file-name-non-special)
5949 file-name-handler-alist)) 5949 file-name-handler-alist))
5950 5950
5951 ;; We depend on being the last handler on the list, 5951 ;; We depend on being the last handler on the list,
5952 ;; so that anything else which does need handling 5952 ;; so that anything else which does need handling
5953 ;; has been handled already. 5953 ;; has been handled already.