From 5074c884a747f2c326275f1c887c136d189c26e8 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Tue, 16 May 1995 06:14:22 +0000 Subject: (facemenu-set-face-from-menu): Doc fix. (facemenu-set-background, facemenu-set-foreground): Doc fix. (facemenu-set-face): Doc fix. --- lisp/facemenu.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'lisp/facemenu.el') diff --git a/lisp/facemenu.el b/lisp/facemenu.el index d7f9964bd78..1c9c5de811f 100644 --- a/lisp/facemenu.el +++ b/lisp/facemenu.el @@ -263,7 +263,7 @@ Interactively, the face to be used is prompted for. If the region is active, it will be set to the requested face. If it is inactive \(even if mark-even-if-inactive is set) the next character that is typed \(or otherwise inserted) will be set to -the the selected face. Moving point or switching buffers before +the selected face. Moving point or switching buffers before typing a character cancels the request." (interactive (list (read-face-name "Use face: "))) (barf-if-buffer-read-only) @@ -281,7 +281,7 @@ The color is prompted for. A face named `fg:color' is used \(or created). If the region is active, it will be set to the requested face. If it is inactive \(even if mark-even-if-inactive is set) the next character that is typed \(via `self-insert-command') will be set to -the the selected face. Moving point or switching buffers before +the selected face. Moving point or switching buffers before typing a character cancels the request." (interactive (list (facemenu-read-color "Foreground color: "))) (let ((face (intern (concat "fg:" color)))) @@ -296,7 +296,7 @@ The color is prompted for. A face named `bg:color' is used \(or created). If the region is active, it will be set to the requested face. If it is inactive \(even if mark-even-if-inactive is set) the next character that is typed \(via `self-insert-command') will be set to -the the selected face. Moving point or switching buffers before +the selected face. Moving point or switching buffers before typing a character cancels the request." (interactive (list (facemenu-read-color "Background color: "))) (let ((face (intern (concat "bg:" color)))) @@ -312,7 +312,7 @@ is the menu item's name. If the region is active, it will be set to the requested face. If it is inactive \(even if mark-even-if-inactive is set) the next character that is typed \(or otherwise inserted) will be set to -the the selected face. Moving point or switching buffers before +the selected face. Moving point or switching buffers before typing a character cancels the request." (interactive (list last-command-event (if mark-active (region-beginning)) -- cgit v1.2.1