summaryrefslogtreecommitdiff
path: root/lisp/paths.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/paths.el')
-rw-r--r--lisp/paths.el7
1 files changed, 4 insertions, 3 deletions
diff --git a/lisp/paths.el b/lisp/paths.el
index 401a981cd87..ea10762a3aa 100644
--- a/lisp/paths.el
+++ b/lisp/paths.el
@@ -122,7 +122,7 @@ the environment variable INFOPATH is set.")
The name of the host running an NNTP server.
The null string means use the local host as the server site.")
-(defvar gnus-nntp-service "nntp" "\
+(defvar gnus-nntp-service (purecopy "nntp") "\
NNTP service name, usually \"nntp\" or 119.
Go to a local news spool if its value is nil, in which case `gnus-nntp-server'
should be set to `(system-name)'.")
@@ -138,6 +138,7 @@ Name of user's primary mail file."
:version "21.1")
(defvar rmail-spool-directory
+ (purecopy
(cond ((file-exists-p "/var/mail")
;; SVR4 and recent BSD are said to use this.
;; Rather than trying to know precisely which systems use it,
@@ -148,7 +149,7 @@ Name of user's primary mail file."
"/var/spool/mail/")
((memq system-type '(hpux usg-unix-v irix))
"/usr/mail/")
- (t "/usr/spool/mail/"))
+ (t "/usr/spool/mail/")))
"Name of directory used by system mailer for delivering new mail.
Its name should end with a slash.")
@@ -177,7 +178,7 @@ Its name should end with a slash.")
:group 'environment
:type 'file)
-(defvar term-file-prefix "term/" "\
+(defvar term-file-prefix (purecopy "term/") "\
If non-nil, Emacs startup does (load (concat term-file-prefix (getenv \"TERM\")))
You may set this variable to nil in your `.emacs' file if you do not wish
the terminal-initialization file to be loaded.")