aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorChong Yidong2012-01-28 11:21:04 +0800
committerChong Yidong2012-01-28 11:21:04 +0800
commit2680c30938c8f553a2d76dfe12313028b08c6dc7 (patch)
tree557e25cd3c685773f18c50a37bcf2a1d176df9cb /lisp
parent0e24a8b2f490baa90f726639134d04ec82078b98 (diff)
downloademacs-2680c30938c8f553a2d76dfe12313028b08c6dc7.tar.gz
emacs-2680c30938c8f553a2d76dfe12313028b08c6dc7.zip
* lisp/frame.el (set-cursor-color): Doc fix.
* doc/emacs/display.texi (Faces): Add xref to Colors node. Fixes: debbugs:352
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/frame.el6
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 29bf8e7a414..c683f94444b 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
12012-01-28 Chong Yidong <cyd@gnu.org> 12012-01-28 Chong Yidong <cyd@gnu.org>
2 2
3 * frame.el (set-cursor-color): Doc fix (Bug#352).
4
3 * mail/rmail.el (rmail-start-mail): Add send-action again (Bug#10625). 5 * mail/rmail.el (rmail-start-mail): Add send-action again (Bug#10625).
4 (rmail-mail-return): Switch to NEWBUF only if it is non-nil. 6 (rmail-mail-return): Switch to NEWBUF only if it is non-nil.
5 7
diff --git a/lisp/frame.el b/lisp/frame.el
index 842d07abf50..88ae712bab2 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -1108,7 +1108,11 @@ To get the frame's current foreground color, use `frame-parameters'."
1108(defun set-cursor-color (color-name) 1108(defun set-cursor-color (color-name)
1109 "Set the text cursor color of the selected frame to COLOR-NAME. 1109 "Set the text cursor color of the selected frame to COLOR-NAME.
1110When called interactively, prompt for the name of the color to use. 1110When called interactively, prompt for the name of the color to use.
1111To get the frame's current cursor color, use `frame-parameters'." 1111This works by setting the `cursor-color' frame parameter on the
1112selected frame.
1113
1114You can also set the text cursor color, for all frames, by
1115customizing the `cursor' face."
1112 (interactive (list (read-color "Cursor color: "))) 1116 (interactive (list (read-color "Cursor color: ")))
1113 (modify-frame-parameters (selected-frame) 1117 (modify-frame-parameters (selected-frame)
1114 (list (cons 'cursor-color color-name)))) 1118 (list (cons 'cursor-color color-name))))