[14330] in Athena Bugs
Emacs19: suggestions for site-init.el file
daemon@ATHENA.MIT.EDU (Jacob Morzinski)
Sun May 5 05:23:56 1996
Date: Sun, 5 May 1996 05:23:54 -0400
From: Jacob Morzinski <jmorzins@MIT.EDU>
To: bugs@MIT.EDU
In GNU Emacs 19.30.1 (sparc-sun-solaris2.3, X toolkit) of Tue Apr 2 1996 on packet-drop
configured using `configure --prefix=/usr/athena --with-x-toolkit --sharedstatedir=/var/tmp --with-pop --with-hesiod --with-kerberos'
Some suggestions for the /usr/athena/share/emacs/19.30/lisp/site-init.el
file. I've been trying to use Gnus with the athena version of emacs19,
and bumped up against some difficulties. Here's the part of my lisp
files that corrects the problems. Feel free to do whatever you want
to with them....
---Begin file: /afs/athena/user/j/m/jmorzins/emacs/my-site-init.el --
;;; The puppose of this file is to be a repository of definitions that
;;; *ought* to be in the lisp/site-init.el file, but aren't. I'm
;;; trying out things that should properly be done for all users.
;;; Gnus has a problem, in which it posts articles as being from
;;; "jqdoe@w20-575-105.mit.edu (John Q. Doe)". This is bad, because
;;; outside people cannot send mail to the machine of that name.
;;; The reason for this error is interesting. The variable
;;; `gnus-local-domain' is set in the site-init.el file. But I can't
;;; figure out why! The documentation for the variable states:
;;; gnus-local-domain's value is "mit.edu"
;;;
;;; Documentation:
;;; Local domain name without a host name.
;;; The DOMAINNAME environment variable is used instead if it is defined.
;;; If the `system-name' function returns the full Internet name, there is
;;; no need to set this variable.
;;; Note that `system-name' does indeed return the full Internet name.
;;; The info documentation for `user-mail-address' states:
;;; `user-mail-address'
;;; If all of `gnus-user-login-name', `gnus-use-generic-from' and
;;; `gnus-local-domain' are `nil', Gnus will use `user-mail-address'
;;; as the address part of the `From' header.
;;; It looks like that fact that gnus-local-domain is set is what's
;;; causing us troubles when we try to post. `user-mail-address' has a
;;; sane value. So my question is: why has `gnus-local-domain' been set?
;;; Perhaps it made more sense with GNUS 4.1 than with Gnus 5.1, and the
;;; local Emacs maintainers haven't caught on yet.
(if (equal "mit.edu" gnus-local-domain) (setq gnus-local-domain nil))
;;; AMAZING! Unsetting the variable solves the problem.
;;; This variable would convince Gnus to use "mit.edu" as the host name.
;;; (For a stronger variable, look at `gnus-user-from-line'). Fortunately,
;;; such convincing is not necessary, if you (setq gnus-local-domain nil).
;;; If you don't want to do that, then uncomment this line.
;(setq gnus-use-generic-from "mit.edu") ;work around damaged 'gnus-local-domain
;;; Emacs 19.30 has line-number-mode turned on my default. This makes
;;; it so that Gnus puts the information about how far through the
;;; article you are ("52%") off the edge of the line. Increasing this
;;; variable (from its default of 21, up to 27) gives Gnus enough
;;; space for line-numer-mode.
(setq gnus-mode-non-string-length 27) ;Make space for line-number-mode.
;;; The current emacs info path is set poorly: users seeking the
;;; emacs19 documentation won't find it. Take steps to remedy that.
(setq Info-default-directory-list (append
'(
"/afs/athena/astaff/project/emacs19/info" ;The emacs19 info dir
"/afs/sipb/contrib/emacs/info" ;Has the elisp-info files
"/afs/sipb/project/gnu/info" ;Info on GNU commands. Not essential.
) Info-default-directory-list
))
