Commit 0bbe869a authored by Andreas Schwab's avatar Andreas Schwab
Browse files

(custom-face-edit-fix-value): Change :reverse-video to :inverse-video.

parent a75a5dd2
2002-12-07 Andreas Schwab <schwab@suse.de>
* cus-edit.el (custom-face-edit-fix-value): Change :reverse-video
to :inverse-video.
2002-12-07 Markus Rost <rost@math.ohio-state.edu>
 
* wid-edit.el (define-widget number): Clarify doc and error
......
......@@ -2553,7 +2553,8 @@ to switch between two values."
custom-face-attributes))
(defun custom-face-edit-fix-value (widget value)
"Ignoring WIDGET, convert :bold and :italic in VALUE to new form."
"Ignoring WIDGET, convert :bold and :italic in VALUE to new form.
Also change :reverse-video to :inverse-video."
(if (listp value)
(let (result)
(while value
......@@ -2565,6 +2566,9 @@ to switch between two values."
((eq key :bold)
(push :weight result)
(push (if val 'bold 'normal) result))
((eq key :reverse-video)
(push :inverse-video result)
(push val result))
(t
(push key result)
(push val result))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment