diff options
| -rw-r--r-- | lisp/ChangeLog | 8 | ||||
| -rw-r--r-- | lisp/startup.el | 3 |
2 files changed, 11 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0e25346fa93..59fbd6b6bab 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2002-10-02 Markus Rost <rost@math.ohio-state.edu> + + * progmodes/sh-script.el (sh-alias-alist): Use append instead of + nconc. + + * startup.el (normal-top-level): Reset standard-value property of + `user-full-name' here. + 2002-10-01 Bill Wohler <wohler@newt.com> * mail/mh-comp.el, mail/mh-e.el, mail/mh-funcs.el, diff --git a/lisp/startup.el b/lisp/startup.el index eb8ce6e8418..99de8ff30d1 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -429,6 +429,9 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." (save-excursion (set-buffer (get-buffer "*Messages*")) (setq default-directory dir))) + ;; `user-full-name' is now known; reset its standard-value here. + (put 'user-full-name 'standard-value + (list (default-value 'user-full-name))) ;; For root, preserve owner and group when editing files. (if (equal (user-uid) 0) (setq backup-by-copying-when-mismatch t)) |