aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGerd Moellmann <[email protected]>2000-11-30 13:01:40 +0000
committerGerd Moellmann <[email protected]>2000-11-30 13:01:40 +0000
commitc069a9d325a3d63a33ba7be59c061168c60075d0 (patch)
tree84b93d07ad587a2bc36a6d63ea04adaed4cd2cce
parent943a8bb7b8f4d07ad81f25d5d6828e5fd76db6a9 (diff)
(custom-face-value-create): Always emphasize tag.
-rw-r--r--lisp/ChangeLog4
-rw-r--r--lisp/cus-edit.el2
2 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6be07926c1..47c45dbaac 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -17,6 +17,10 @@
* emulation/tpu-extras.el (tpu-forward-line): Use
forward-visible-line.
+2000-11-30 Per Abrahamsen <[email protected]>
+
+ * cus-edit.el (custom-face-value-create): Always emphasize tag.
+
2000-11-30 Edward M. Reingold <[email protected]>
* calendar/diary-lib.el (diary-entry-time): Anchor pattern correctly
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 55ef28ce93..137b406663 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -2666,9 +2666,9 @@ SPEC must be a full face spec."
(t
;; Create tag.
(insert tag)
+ (widget-specify-sample widget begin (point))
(if (eq custom-buffer-style 'face)
(insert " ")
- (widget-specify-sample widget begin (point))
(if (string-match "face\\'" tag)
(insert ":")
(insert " face: ")))