Commit f5ff08b0 authored by Richard M. Stallman's avatar Richard M. Stallman

(syms_of_editfns): Just staticpro Vuser...name

and Vsystem_name; don't make them Lisp variables.
parent 304188d6
......@@ -1492,17 +1492,10 @@ Case is ignored if `case-fold-search' is non-nil in the current buffer.")
void
syms_of_editfns ()
{
DEFVAR_LISP ("system-name", &Vsystem_name,
"The name of the machine Emacs is running on.");
DEFVAR_LISP ("user-full-name", &Vuser_full_name,
"The full name of the user logged in.");
DEFVAR_LISP ("user-name", &Vuser_name,
"The user's name, based on the effective uid.");
DEFVAR_LISP ("user-real-name", &Vuser_real_name,
"The user's name, base upon the real uid.");
staticpro (&Vuser_name);
staticpro (&Vuser_full_name);
staticpro (&Vuser_real_name);
staticpro (&Vsystem_name);
defsubr (&Schar_equal);
defsubr (&Sgoto_char);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment