Mercurial > hg > xemacs-beta

comparison lisp/paths.el @ 380:8626e4521993 r21-2-5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-5
author cvs
date Mon, 13 Aug 2007 11:07:10 +0200
parents cc15677e0335
children 1f50e6fe4f3f
comparison
equal deleted inserted replaced
379:76b7d63099ad 380:8626e4521993
116 "Program used to send messages.") 116 "Program used to send messages.")
117 117
118 (defconst remote-shell-program nil 118 (defconst remote-shell-program nil
119 "Program used to execute shell commands on a remote machine.") 119 "Program used to execute shell commands on a remote machine.")
120 120
121 (defconst term-file-prefix 121 (defconst term-file-prefix (purecopy "term/")
122 (purecopy (if (eq system-type 'vax-vms) "[.term]" "term/"))
123 "If non-nil, Emacs startup does (load (concat term-file-prefix (getenv \"TERM\"))) 122 "If non-nil, Emacs startup does (load (concat term-file-prefix (getenv \"TERM\")))
124 You may set this variable to nil in your `.emacs' file if you do not wish 123 You may set this variable to nil in your `.emacs' file if you do not wish
125 the terminal-initialization file to be loaded.") 124 the terminal-initialization file to be loaded.")
126 125
127 (defconst manual-program nil 126 (defconst manual-program nil
128 "Program to run to print man pages.") 127 "Program to run to print man pages.")
129 128
130 (defconst abbrev-file-name 129 (defconst abbrev-file-name (purecopy "~/.abbrev_defs")
131 (purecopy (if (eq system-type 'vax-vms)
132 "~/abbrev.def"
133 "~/.abbrev_defs"))
134 "*Default name of file to read abbrevs from.") 130 "*Default name of file to read abbrevs from.")
135 131
136 (defconst directory-abbrev-alist 132 (defconst directory-abbrev-alist
137 (list 133 (list
138 ;; 134 ;;