Mercurial > emacs
comparison src/editfns.c @ 72751:9128a4531448
(Fsystem_name): Mention "host" in the doc string.
(syms_of_editfns) <system-name>: Likewise.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sat, 09 Sep 2006 10:50:03 +0000 |
parents | d8f99fba05ca |
children | 861a71881b6a |
comparison
equal
deleted
inserted
replaced
72750:c0ce3c2d9d46 | 72751:9128a4531448 |
---|---|
1388 | 1388 |
1389 return full; | 1389 return full; |
1390 } | 1390 } |
1391 | 1391 |
1392 DEFUN ("system-name", Fsystem_name, Ssystem_name, 0, 0, 0, | 1392 DEFUN ("system-name", Fsystem_name, Ssystem_name, 0, 0, 0, |
1393 doc: /* Return the name of the machine you are running on, as a string. */) | 1393 doc: /* Return the host name of the machine you are running on, as a string. */) |
1394 () | 1394 () |
1395 { | 1395 { |
1396 return Vsystem_name; | 1396 return Vsystem_name; |
1397 } | 1397 } |
1398 | 1398 |
4368 `buffer-substring' need not call the `buffer-access-fontify-functions' | 4368 `buffer-substring' need not call the `buffer-access-fontify-functions' |
4369 functions if all the text being accessed has this property. */); | 4369 functions if all the text being accessed has this property. */); |
4370 Vbuffer_access_fontified_property = Qnil; | 4370 Vbuffer_access_fontified_property = Qnil; |
4371 | 4371 |
4372 DEFVAR_LISP ("system-name", &Vsystem_name, | 4372 DEFVAR_LISP ("system-name", &Vsystem_name, |
4373 doc: /* The name of the machine Emacs is running on. */); | 4373 doc: /* The host name of the machine Emacs is running on. */); |
4374 | 4374 |
4375 DEFVAR_LISP ("user-full-name", &Vuser_full_name, | 4375 DEFVAR_LISP ("user-full-name", &Vuser_full_name, |
4376 doc: /* The full name of the user logged in. */); | 4376 doc: /* The full name of the user logged in. */); |
4377 | 4377 |
4378 DEFVAR_LISP ("user-login-name", &Vuser_login_name, | 4378 DEFVAR_LISP ("user-login-name", &Vuser_login_name, |