mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-18 17:01:01 -08:00
Code Issues Projects Releases Wiki Activity

(Fuser_login_name, Fuser_real_login_name):

Browse source 
Call init_editfns now if it was not done before.
This commit is contained in:
Richard M. Stallman 1994-10-13 18:21:25 +00:00
parent c561a0cbfd
commit f8a0e364da
1 changed files with 10 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

10
src/editfns.c
View file

@ -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;
}