/[emacs]/emacs/lisp/paths.el
ViewVC logotype

Diff of /emacs/lisp/paths.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.62 by rms, Tue Feb 26 21:56:12 2002 UTC revision 1.62.4.1 by miles, Fri Apr 4 06:20:10 2003 UTC
# Line 1  Line 1 
1  ;;; paths.el --- define pathnames for use by various Emacs commands  ;;; paths.el --- define pathnames for use by various Emacs commands -*- no-byte-compile: t -*-
2    
3  ;; Copyright (C) 1986, 1988, 1994, 1999, 2000 Free Software Foundation, Inc.  ;; Copyright (C) 1986, 1988, 1994, 1999, 2000 Free Software Foundation, Inc.
4    
# Line 130  should be set to `(system-name)'.") Line 130  should be set to `(system-name)'.")
130  *The name of your organization, as a string.  *The name of your organization, as a string.
131  The `ORGANIZATION' environment variable is used instead if defined.")  The `ORGANIZATION' environment variable is used instead if defined.")
132    
 (defvar gnus-startup-file "~/.newsrc" "\  
 The file listing groups to which user is subscribed.  
 Will use `gnus-startup-file'-SERVER instead if exists.")  
   
133  (defcustom rmail-file-name "~/RMAIL"  (defcustom rmail-file-name "~/RMAIL"
134    "*Name of user's primary mail file."    "*Name of user's primary mail file."
135    :type 'string    :type 'string
# Line 143  Will use `gnus-startup-file'-SERVER inst Line 139  Will use `gnus-startup-file'-SERVER inst
139  (defconst rmail-spool-directory  (defconst rmail-spool-directory
140    (cond ((string-match "^[^-]+-[^-]+-sco3.2v4" system-configuration)    (cond ((string-match "^[^-]+-[^-]+-sco3.2v4" system-configuration)
141           "/usr/spool/mail/")           "/usr/spool/mail/")
142          ;; On The Bull DPX/2 /usr/spool/mail is used although          ;; On The Bull DPX/2 /usr/spool/mail is used although
143          ;; it is usg-unix-v.          ;; it is usg-unix-v.
144          ((string-match "^m68k-bull-sysv3" system-configuration)          ((string-match "^m68k-bull-sysv3" system-configuration)
145           "/usr/spool/mail/")           "/usr/spool/mail/")
# Line 197  If non-nil, Emacs startup does (load (co Line 193  If non-nil, Emacs startup does (load (co
193  You may set this variable to nil in your `.emacs' file if you do not wish  You may set this variable to nil in your `.emacs' file if you do not wish
194  the terminal-initialization file to be loaded.")  the terminal-initialization file to be loaded.")
195    
196  (defconst abbrev-file-name  (defconst abbrev-file-name
197    (if (eq system-type 'vax-vms)    (if (eq system-type 'vax-vms)
198        "~/abbrev.def"        "~/abbrev.def"
199      (convert-standard-filename "~/.abbrev_defs"))      (convert-standard-filename "~/.abbrev_defs"))

Legend:
Removed from v.1.62  
changed lines
  Added in v.1.62.4.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26