]> git.eshelyaron.com Git - emacs.git/commitdiff
Give the scroll-bar face a non-trivial spec
authorMauro Aranda <maurooaranda@gmail.com>
Fri, 30 Oct 2020 14:13:34 +0000 (11:13 -0300)
committerMauro Aranda <maurooaranda@gmail.com>
Sat, 31 Oct 2020 20:07:59 +0000 (17:07 -0300)
* lisp/faces.el (scroll-bar): Give it a non-trivial spec, so when
resetting it to its face-defface-spec, we effectively reset it.
(Bug#13476)

lisp/faces.el

index 0ce9532270373ff5edf7b0ac34d6390673f67488..728f8b0fe67a08f64ec63c800e25e0de818febc5 100644 (file)
@@ -2716,9 +2716,11 @@ used to display the prompt text."
   :group 'frames
   :group 'basic-faces)
 
-(defface scroll-bar '((t nil))
+(defface scroll-bar
+  '((((background light)) :foreground "black")
+    (((background dark))  :foreground "white"))
   "Basic face for the scroll bar colors under X."
-  :version "21.1"
+  :version "28.1"
   :group 'frames
   :group 'basic-faces)