changeset 9520:5187a4159d16

(Fuser_login_name, Fuser_real_login_name): Call init_editfns now if it was not done before.
author Richard M. Stallman <rms@gnu.org>
date Thu, 13 Oct 1994 18:21:25 +0000
parents c7925093b270
children d53ed4fd05ca
files src/editfns.c
diffstat 1 files changed, 10 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/src/editfns.c	Thu Oct 13 18:20:55 1994 +0000
+++ b/src/editfns.c	Thu Oct 13 18:21:25 1994 +0000
@@ -490,6 +490,11 @@
 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 @@
 `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;
 }