(help-make-xrefs): Delete extraneous newlines at the end of the docstring.

[gnu-emacs] / lisp / frame.el

diff --git a/lisp/frame.el b/lisp/frame.el
index 81f29dfe230040a5f83465ca11d72aba75965a92..06dfcbf8469662303326f6dbb518e2cac417f01e 100644 (file)
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -490,7 +490,7 @@ The optional second argument PARAMETERS specifies additional frame parameters."
   "Functions to run after a frame is created.
 The functions are run with one arg, the newly created frame.")
 
-(defvar after-setting-font-hooks nil
+(defvar after-setting-font-hook nil
   "Functions to run after a frame's font has been changed.")
 
 ;; Alias, kept temporarily.
@@ -733,7 +733,7 @@ To get the frame's current default font, use `frame-parameters'."
                               (x-list-fonts "*" nil (selected-frame)))))))
   (modify-frame-parameters (selected-frame)
                           (list (cons 'font font-name)))
-  (run-hooks 'after-setting-font-hooks))
+  (run-hooks 'after-setting-font-hook 'after-setting-font-hooks))
 
 (defun set-background-color (color-name)
   "Set the background color of the selected frame to COLOR-NAME.
@@ -1161,7 +1161,8 @@ itself as a pre-command hook."
 \f
 (defcustom show-cursor-in-non-selected-windows t
   "*Non-nil means show a hollow box cursor in non-selected-windows.
-If nil, don't show a cursor except in the selected window."
+If nil, don't show a cursor except in the selected window.
+Setting this variable directly has no effect; use custom instead."
   :tag "Cursor in non-selected windows"
   :type 'boolean
   :group 'cursor