Fix documentation of a recent change

* src/keyboard.c (update_recent_keys): Fix commentary.
(Flossage_size): Fix doc string.

* etc/NEWS: Move and fix wording of the recently added entry.

diff --git a/etc/NEWS b/etc/NEWS
index 1ee86de128c4d57fcce92ca84785888995ec05eb..5b69e2f423b8bd9a53bae278ba87a5f0acc169cf 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -85,10 +85,6 @@ useful on systems such as FreeBSD which ships only with "etc/termcap".
 \f
 * Changes in Emacs 28.1
 
-+++
-** The new command 'lossage-size' allow users to set the maximum
-number of keystrokes and commands recorded.
-
 +++
 *** Emacs now defaults to UTF-8 instead of ISO-8859-1.
 This is only for the default, where the user has set no 'LANG' (or
@@ -481,6 +477,11 @@ authentication mechanism by setting a value for the key 'smtp-auth'.
 +++
 *** New command 'describe-keymap' describes keybindings in a keymap.
 
++++
+** New command 'lossage-size'.
+It allows users to set the maximum number of keystrokes and commands
+recorded for the purpose of 'view-lossage'.
+
 ---
 *** The command 'view-lossage' can now be invoked from the menu bar.
 The menu-bar Help menu now has a "Show Recent Inputs" item under the

diff --git a/src/keyboard.c b/src/keyboard.c
index c0a41e6c4cfa16faa2fc607dbf7ba0c226bb3c15..d82d323f637e1a29d26152c263e450b851bb4c2f 100644 (file)
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -6042,7 +6042,7 @@ make_lispy_event (struct input_event *event)
       }
 #endif
 
-#ifdef USE_FILE_NOTIFY
+#ifdef USE_FILE_NO101TIFY
     case FILE_NOTIFY_EVENT:
 #ifdef HAVE_W32NOTIFY
       /* Make an event (file-notify (DESCRIPTOR ACTION FILE) CALLBACK).  */
@@ -10414,7 +10414,8 @@ If CHECK-TIMERS is non-nil, timers that are ready to run will do so.  */)
          ? Qt : Qnil);
 }
 
-/* Reallocate recent_keys copying the keystrokes in the right order */
+/* Reallocate recent_keys copying the recorded keystrokes
+   in the right order.  */
 static void
 update_recent_keys (int new_size, int kept_keys)
 {
@@ -10439,10 +10440,10 @@ update_recent_keys (int new_size, int kept_keys)
 
 DEFUN ("lossage-size", Flossage_size, Slossage_size, 0, 1,
        "(list (read-number \"new-size: \" (lossage-size)))",
-       doc: /* Return the maximum number of saved keystrokes.
-Called with ARG, then set this limit to ARG and return it.
+       doc: /* Return or set the maximum number of keystrokes to save.
+If called with a non-nil ARG, set the limit to ARG and return it.
 
-The saved keystrokes are the records shown by `view-lossage'.  */)
+The saved keystrokes are shown by `view-lossage'.  */)
   (Lisp_Object arg)
 {
   if (NILP(arg))