comparison lisp/simple.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 a0f778f4a995
children 10cb13aa45b6
comparison
equal deleted inserted replaced
105964:bedac8edf64d 105965:3f64b8380468
2001 "History list for some commands that read shell commands. 2001 "History list for some commands that read shell commands.
2002 2002
2003 Maximum length of the history list is determined by the value 2003 Maximum length of the history list is determined by the value
2004 of `history-length', which see.") 2004 of `history-length', which see.")
2005 2005
2006 (defvar shell-command-switch "-c" 2006 (defvar shell-command-switch (purecopy "-c")
2007 "Switch used to have the shell execute its command line argument.") 2007 "Switch used to have the shell execute its command line argument.")
2008 2008
2009 (defvar shell-command-default-error-buffer nil 2009 (defvar shell-command-default-error-buffer nil
2010 "*Buffer name for `shell-command' and `shell-command-on-region' error output. 2010 "*Buffer name for `shell-command' and `shell-command-on-region' error output.
2011 This buffer is used when `shell-command' or `shell-command-on-region' 2011 This buffer is used when `shell-command' or `shell-command-on-region'
2943 :type 'boolean 2943 :type 'boolean
2944 :group 'killing) 2944 :group 'killing)
2945 2945
2946 (put 'text-read-only 'error-conditions 2946 (put 'text-read-only 'error-conditions
2947 '(text-read-only buffer-read-only error)) 2947 '(text-read-only buffer-read-only error))
2948 (put 'text-read-only 'error-message "Text is read-only") 2948 (put 'text-read-only 'error-message (purecopy "Text is read-only"))
2949 2949
2950 (defun kill-region (beg end &optional yank-handler) 2950 (defun kill-region (beg end &optional yank-handler)
2951 "Kill (\"cut\") text between point and mark. 2951 "Kill (\"cut\") text between point and mark.
2952 This deletes the text from the buffer and saves it in the kill ring. 2952 This deletes the text from the buffer and saves it in the kill ring.
2953 The command \\[yank] can retrieve it from there. 2953 The command \\[yank] can retrieve it from there.