diff options
| author | Richard M. Stallman | 1992-06-04 06:43:29 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1992-06-04 06:43:29 +0000 |
| commit | 06ef7355233ad4c48339be5bd690beb74fae9056 (patch) | |
| tree | c219ea3831cd01ca9c47be531c71938422b631ef /src | |
| parent | aa734e174a97c389893767aa1349e55fc58b5a05 (diff) | |
| download | emacs-06ef7355233ad4c48339be5bd690beb74fae9056.tar.gz emacs-06ef7355233ad4c48339be5bd690beb74fae9056.zip | |
*** empty log message ***
Diffstat (limited to 'src')
| -rw-r--r-- | src/dispnew.c | 4 | ||||
| -rw-r--r-- | src/eval.c | 6 | ||||
| -rw-r--r-- | src/keyboard.c | 6 | ||||
| -rw-r--r-- | src/print.c | 2 | ||||
| -rw-r--r-- | src/xfns.c | 6 |
5 files changed, 16 insertions, 8 deletions
diff --git a/src/dispnew.c b/src/dispnew.c index fbfe3b702e7..8b4abb24a21 100644 --- a/src/dispnew.c +++ b/src/dispnew.c | |||
| @@ -1794,7 +1794,7 @@ Optional second arg non-nil means ARG is measured in milliseconds.\n\ | |||
| 1794 | if (!NILP (millisec)) | 1794 | if (!NILP (millisec)) |
| 1795 | { | 1795 | { |
| 1796 | #ifndef EMACS_HAS_USECS | 1796 | #ifndef EMACS_HAS_USECS |
| 1797 | error ("millisecond sit-for not supported on %s", SYSTEM_TYPE); | 1797 | error ("millisecond `sleep-for' not supported on %s", SYSTEM_TYPE); |
| 1798 | #else | 1798 | #else |
| 1799 | usec = sec % 1000 * 1000; | 1799 | usec = sec % 1000 * 1000; |
| 1800 | sec /= 1000; | 1800 | sec /= 1000; |
| @@ -1913,7 +1913,7 @@ Value is t if waited the full time with no input arriving.") | |||
| 1913 | if (!NILP (millisec)) | 1913 | if (!NILP (millisec)) |
| 1914 | { | 1914 | { |
| 1915 | #ifndef EMACS_HAS_USECS | 1915 | #ifndef EMACS_HAS_USECS |
| 1916 | error ("millisecond sit-for not supported on %s", SYSTEM_TYPE); | 1916 | error ("millisecond `sit-for' not supported on %s", SYSTEM_TYPE); |
| 1917 | #else | 1917 | #else |
| 1918 | usec = (sec % 1000) * 1000; | 1918 | usec = (sec % 1000) * 1000; |
| 1919 | sec /= 1000; | 1919 | sec /= 1000; |
diff --git a/src/eval.c b/src/eval.c index abe3674a279..f5e0bc2e276 100644 --- a/src/eval.c +++ b/src/eval.c | |||
| @@ -520,7 +520,8 @@ You are not required to define a variable in order to use it,\n\ | |||
| 520 | but the definition can supply documentation and an initial value\n\ | 520 | but the definition can supply documentation and an initial value\n\ |
| 521 | in a way that tags can recognize.\n\n\ | 521 | in a way that tags can recognize.\n\n\ |
| 522 | INITVALUE is evaluated, and used to set SYMBOL, only if SYMBOL's value is void.\n\ | 522 | INITVALUE is evaluated, and used to set SYMBOL, only if SYMBOL's value is void.\n\ |
| 523 | If SYMBOL is buffer-local, its default value is initialized in this way.\n\ | 523 | If SYMBOL is buffer-local, its default value is what is set;\n\ |
| 524 | buffer-local values are not affected.\n\ | ||
| 524 | INITVALUE and DOCSTRING are optional.\n\ | 525 | INITVALUE and DOCSTRING are optional.\n\ |
| 525 | If DOCSTRING starts with *, this variable is identified as a user option.\n\ | 526 | If DOCSTRING starts with *, this variable is identified as a user option.\n\ |
| 526 | This means that M-x set-variable and M-x edit-options recognize it.\n\ | 527 | This means that M-x set-variable and M-x edit-options recognize it.\n\ |
| @@ -552,7 +553,8 @@ DEFUN ("defconst", Fdefconst, Sdefconst, 2, UNEVALLED, 0, | |||
| 552 | "(defconst SYMBOL INITVALUE DOCSTRING): define SYMBOL as a constant variable.\n\ | 553 | "(defconst SYMBOL INITVALUE DOCSTRING): define SYMBOL as a constant variable.\n\ |
| 553 | The intent is that programs do not change this value, but users may.\n\ | 554 | The intent is that programs do not change this value, but users may.\n\ |
| 554 | Always sets the value of SYMBOL to the result of evalling INITVALUE.\n\ | 555 | Always sets the value of SYMBOL to the result of evalling INITVALUE.\n\ |
| 555 | If SYMBOL is buffer-local, its default value is initialized in this way.\n\ | 556 | If SYMBOL is buffer-local, its default value is what is set;\n\ |
| 557 | buffer-local values are not affected.\n\ | ||
| 556 | DOCSTRING is optional.\n\ | 558 | DOCSTRING is optional.\n\ |
| 557 | If DOCSTRING starts with *, this variable is identified as a user option.\n\ | 559 | If DOCSTRING starts with *, this variable is identified as a user option.\n\ |
| 558 | This means that M-x set-variable and M-x edit-options recognize it.\n\n\ | 560 | This means that M-x set-variable and M-x edit-options recognize it.\n\n\ |
diff --git a/src/keyboard.c b/src/keyboard.c index 910a4b9a77f..22ce74ed963 100644 --- a/src/keyboard.c +++ b/src/keyboard.c | |||
| @@ -155,7 +155,7 @@ Lisp_Object meta_prefix_char; | |||
| 155 | /* Last size recorded for a current buffer which is not a minibuffer. */ | 155 | /* Last size recorded for a current buffer which is not a minibuffer. */ |
| 156 | static int last_non_minibuf_size; | 156 | static int last_non_minibuf_size; |
| 157 | 157 | ||
| 158 | /* Number of idle seconds before an auto-save. */ | 158 | /* Number of idle seconds before an auto-save and garbage collection. */ |
| 159 | static Lisp_Object Vauto_save_timeout; | 159 | static Lisp_Object Vauto_save_timeout; |
| 160 | 160 | ||
| 161 | /* Total number of times read_char has returned. */ | 161 | /* Total number of times read_char has returned. */ |
| @@ -3569,7 +3569,9 @@ Zero means disable autosaving due to number of characters typed."); | |||
| 3569 | 3569 | ||
| 3570 | DEFVAR_LISP ("auto-save-timeout", &Vauto_save_timeout, | 3570 | DEFVAR_LISP ("auto-save-timeout", &Vauto_save_timeout, |
| 3571 | "*Number of seconds idle time before auto-save.\n\ | 3571 | "*Number of seconds idle time before auto-save.\n\ |
| 3572 | Zero or nil means disable auto-saving due to idleness."); | 3572 | Zero or nil means disable auto-saving due to idleness.\n\ |
| 3573 | After auto-saving due to this many seconds of idle time,\n\ | ||
| 3574 | Emacs also does a garbage collection if that seems to be warranted." | ||
| 3573 | XFASTINT (Vauto_save_timeout) = 30; | 3575 | XFASTINT (Vauto_save_timeout) = 30; |
| 3574 | 3576 | ||
| 3575 | DEFVAR_INT ("echo-keystrokes", &echo_keystrokes, | 3577 | DEFVAR_INT ("echo-keystrokes", &echo_keystrokes, |
diff --git a/src/print.c b/src/print.c index 8301ac8ab55..2cd2b9c781e 100644 --- a/src/print.c +++ b/src/print.c | |||
| @@ -942,7 +942,7 @@ or the symbol t (output appears in the minibuffer line)."); | |||
| 942 | 942 | ||
| 943 | #ifdef LISP_FLOAT_TYPE | 943 | #ifdef LISP_FLOAT_TYPE |
| 944 | DEFVAR_LISP ("float-output-format", &Vfloat_output_format, | 944 | DEFVAR_LISP ("float-output-format", &Vfloat_output_format, |
| 945 | "The format descriptor string that lisp uses to print floats.\n\ | 945 | "The format descriptor string used to print floats.\n\ |
| 946 | This is a %-spec like those accepted by `printf' in C,\n\ | 946 | This is a %-spec like those accepted by `printf' in C,\n\ |
| 947 | but with some restrictions. It must start with the two characters `%.'.\n\ | 947 | but with some restrictions. It must start with the two characters `%.'.\n\ |
| 948 | After that comes an integer precision specification,\n\ | 948 | After that comes an integer precision specification,\n\ |
diff --git a/src/xfns.c b/src/xfns.c index 6673ec1716f..c80482c42e2 100644 --- a/src/xfns.c +++ b/src/xfns.c | |||
| @@ -3330,6 +3330,7 @@ DEFUN ("x-select-region", Fx_select_region, Sx_select_region, 1, 1, "e", | |||
| 3330 | } | 3330 | } |
| 3331 | #endif | 3331 | #endif |
| 3332 | 3332 | ||
| 3333 | #if 0 | ||
| 3333 | DEFUN ("x-horizontal-line", Fx_horizontal_line, Sx_horizontal_line, 1, 1, "e", | 3334 | DEFUN ("x-horizontal-line", Fx_horizontal_line, Sx_horizontal_line, 1, 1, "e", |
| 3334 | "") | 3335 | "") |
| 3335 | (event) | 3336 | (event) |
| @@ -3421,6 +3422,7 @@ DEFUN ("x-horizontal-line", Fx_horizontal_line, Sx_horizontal_line, 1, 1, "e", | |||
| 3421 | UNBLOCK_INPUT; | 3422 | UNBLOCK_INPUT; |
| 3422 | } | 3423 | } |
| 3423 | } | 3424 | } |
| 3425 | #endif | ||
| 3424 | 3426 | ||
| 3425 | /* Offset in buffer of character under the pointer, or 0. */ | 3427 | /* Offset in buffer of character under the pointer, or 0. */ |
| 3426 | int mouse_buffer_offset; | 3428 | int mouse_buffer_offset; |
| @@ -4304,7 +4306,7 @@ syms_of_xfns () | |||
| 4304 | Vx_nontext_pointer_shape = Qnil; | 4306 | Vx_nontext_pointer_shape = Qnil; |
| 4305 | 4307 | ||
| 4306 | DEFVAR_INT ("x-mode-pointer-shape", &Vx_mode_pointer_shape, | 4308 | DEFVAR_INT ("x-mode-pointer-shape", &Vx_mode_pointer_shape, |
| 4307 | "The shape of the pointer when not over text."); | 4309 | "The shape of the pointer when over the mode line."); |
| 4308 | Vx_mode_pointer_shape = Qnil; | 4310 | Vx_mode_pointer_shape = Qnil; |
| 4309 | 4311 | ||
| 4310 | DEFVAR_LISP ("x-bar-cursor", &Vbar_cursor, | 4312 | DEFVAR_LISP ("x-bar-cursor", &Vbar_cursor, |
| @@ -4370,7 +4372,9 @@ Values can be the symbols Always, WhenMapped, or NotUseful."); | |||
| 4370 | defsubr (&Sx_create_screen); | 4372 | defsubr (&Sx_create_screen); |
| 4371 | defsubr (&Sfocus_screen); | 4373 | defsubr (&Sfocus_screen); |
| 4372 | defsubr (&Sunfocus_screen); | 4374 | defsubr (&Sunfocus_screen); |
| 4375 | #if 0 | ||
| 4373 | defsubr (&Sx_horizontal_line); | 4376 | defsubr (&Sx_horizontal_line); |
| 4377 | #endif | ||
| 4374 | defsubr (&Sx_rebind_key); | 4378 | defsubr (&Sx_rebind_key); |
| 4375 | defsubr (&Sx_rebind_keys); | 4379 | defsubr (&Sx_rebind_keys); |
| 4376 | defsubr (&Sx_open_connection); | 4380 | defsubr (&Sx_open_connection); |