diff options
author | Richard M. Stallman <rms@gnu.org> | 1994-10-13 18:21:25 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1994-10-13 18:21:25 +0000 |
commit | 38e2981fa3f02df4e8f48d9bf1c4068b4020d1c5 (patch) | |
tree | 61c486d6214528d4f4ad7298bfa7cfa07d5313c0 /src/editfns.c | |
parent | f85608a0d7edd03d01d0b015c5c8dec0a671266d (diff) | |
download | emacs-38e2981fa3f02df4e8f48d9bf1c4068b4020d1c5.tar.gz |
(Fuser_login_name, Fuser_real_login_name):
Call init_editfns now if it was not done before.
Diffstat (limited to 'src/editfns.c')
-rw-r--r-- | src/editfns.c | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/src/editfns.c b/src/editfns.c index 5131fa17438..85b0d0978aa 100644 --- a/src/editfns.c +++ b/src/editfns.c @@ -490,6 +490,11 @@ Also, if the environment variable LOGNAME or USER is set,\n\ that determines the value of this function.") () { + /* Set up the user name info if we didn't do it before. + (That can happen if Emacs is dumpable + but you decide to run `temacs -l loadup' and not dump. */ + if (INTEGERP (Vuser_name)) + init_editfns (); return Vuser_name; } @@ -500,6 +505,11 @@ This ignores the environment variables LOGNAME and USER, so it differs from\n\ `user-login-name' when running under `su'.") () { + /* Set up the user name info if we didn't do it before. + (That can happen if Emacs is dumpable + but you decide to run `temacs -l loadup' and not dump. */ + if (INTEGERP (Vuser_name)) + init_editfns (); return Vuser_real_name; } |