Mercurial > emacs
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. |