summaryrefslogtreecommitdiff
path: root/lisp/textmodes
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2009-10-30 02:00:11 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2009-10-30 02:00:11 +0000
commitca0a881a3512c1f9495833e15a801f5af5b89893 (patch)
tree6d91adb6a5117ab394bb0564cca9f95b8e16f9f1 /lisp/textmodes
parentd9a57abf8154b57d50371250348628e0102e28a2 (diff)
downloademacs-ca0a881a3512c1f9495833e15a801f5af5b89893.tar.gz
* puresize.h (BASE_PURESIZE): Increase to 1470000.
* lread.c (Fload): Purecopy the file name when building Vpreloaded_file_list. * textmodes/ispell.el (ispell-skip-region-alist): * international/mule-conf.el (eight-bit): * international/fontset.el (font-encoding-alist): * startup.el (pure-space-overflow-message): * simple.el (overwrite-mode-textual, overwrite-mode-binary): * paths.el (gnus-nntp-service, rmail-spool-directory) (term-file-prefix): * files.el (save-some-buffers-action-alist): * cmuscheme.el (same-window-buffer-names): * ielm.el (same-window-buffer-names): * shell.el (same-window-buffer-names): * mail/sendmail.el (same-window-buffer-names): * progmodes/inf-lisp.el (same-window-buffer-names): * bindings.el (mode-line-client) (mode-line-column-line-number-mode-map): * language/tibetan.el (tibetan-precomposition-rule-regexp) (tibetan-precomposed-regexp): Purecopy string arguments.
Diffstat (limited to 'lisp/textmodes')
-rw-r--r--lisp/textmodes/ispell.el12
1 files changed, 6 insertions, 6 deletions
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index c8db66fcce6..5005d70d2bc 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -1393,16 +1393,16 @@ The last occurring definition in the buffer will be used.")
;;;###autoload
(defvar ispell-skip-region-alist
- '((ispell-words-keyword forward-line)
+ `((ispell-words-keyword forward-line)
(ispell-dictionary-keyword forward-line)
(ispell-pdict-keyword forward-line)
(ispell-parsing-keyword forward-line)
- ("^---*BEGIN PGP [A-Z ]*--*" . "^---*END PGP [A-Z ]*--*")
+ (,(purecopy "^---*BEGIN PGP [A-Z ]*--*") . ,(purecopy "^---*END PGP [A-Z ]*--*"))
;; assume multiline uuencoded file? "\nM.*$"?
- ("^begin [0-9][0-9][0-9] [^ \t]+$" . "\nend\n")
- ("^%!PS-Adobe-[123].0" . "\n%%EOF\n")
- ("^---* \\(Start of \\)?[Ff]orwarded [Mm]essage"
- . "^---* End of [Ff]orwarded [Mm]essage")
+ (,(purecopy "^begin [0-9][0-9][0-9] [^ \t]+$") . ,(purecopy "\nend\n"))
+ (,(purecopy "^%!PS-Adobe-[123].0") . ,(purecopy "\n%%EOF\n"))
+ (,(purecopy "^---* \\(Start of \\)?[Ff]orwarded [Mm]essage")
+ . ,(purecopy "^---* End of [Ff]orwarded [Mm]essage"))
;; Matches e-mail addresses, file names, http addresses, etc. The
;; `-+' `_+' patterns are necessary for performance reasons when
;; `-' or `_' part of word syntax.