summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJimmy Aguilar Mena <spacibba@aol.com>2019-05-05 16:14:34 +0200
committerJimmy Aguilar Mena <spacibba@aol.com>2019-05-05 16:59:25 +0200
commitcca81f22d972f4bfc953534104e9e72da421f51e (patch)
treebd03de18056f37ce1da42b46a792739909202856
parenta336300ccf024824fbf50298623e04f369952670 (diff)
downloademacs-cca81f22d972f4bfc953534104e9e72da421f51e.tar.gz
Fixed fill-column-indicator face removing background.
*lisp/faces.el: Removed background in default fill-column-indicator face. *src/xdisp.c: fill-column-indicator face merged with saved face.
-rw-r--r--doc/emacs/display.texi3
-rw-r--r--lisp/faces.el4
-rw-r--r--src/xdisp.c10
3 files changed, 10 insertions, 7 deletions
diff --git a/doc/emacs/display.texi b/doc/emacs/display.texi
index 34215699b42..c27b9e7081b 100644
--- a/doc/emacs/display.texi
+++ b/doc/emacs/display.texi
@@ -1186,7 +1186,8 @@ initialization tries to set it to U+2502 or @sampl{|}.
@item fill-column-indicator
@vindex fill-column-indicator
Specifies the face used to display the indicator. It inherits its
-default values from shadow and the default face.
+default values from shadow but without background color. To change
+the indicator color you need to set only the foreground color of this face.
@end table
@vindex indicate-buffer-boundaries
diff --git a/lisp/faces.el b/lisp/faces.el
index b9332790642..207b627f251 100644
--- a/lisp/faces.el
+++ b/lisp/faces.el
@@ -2502,7 +2502,9 @@ unwanted effects."
;; Definition stolen from display-line-numbers.
(defface fill-column-indicator
- '((t :inherit (shadow default)))
+ '((t :inherit shadow :weight normal :slant normal
+ :underline nil :overline nil :strike-through nil
+ :box nil :invert-video nil :stipple nil))
"Face for displaying fill column indicator.
This face is used when `display-fill-column-indicator-mode' is
non-nil."
diff --git a/src/xdisp.c b/src/xdisp.c
index 17827481447..a8604d58af7 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -20201,7 +20201,7 @@ append_space_for_newline (struct it *it, bool default_face_p)
XFIXNAT (Vdisplay_fill_column_indicator_character);
it->face_id =
merge_faces (it->w, Qfill_column_indicator,
- 0, DEFAULT_FACE_ID);
+ 0, saved_face_id);
face = FACE_FROM_ID(it->f, it->face_id);
goto produce_glyphs;
}
@@ -20494,7 +20494,7 @@ extend_face_to_end_of_line (struct it *it)
XFIXNAT (Vdisplay_fill_column_indicator_character);
it->face_id =
merge_faces (it->w, Qfill_column_indicator,
- 0, DEFAULT_FACE_ID);
+ 0, saved_face_id);
PRODUCE_GLYPHS (it);
}
@@ -20656,13 +20656,13 @@ extend_face_to_end_of_line (struct it *it)
{
if (it->current_x == fill_column_indicator_column)
{
- const int saved_face = it->face_id;
+ const int saved_face_id = it->face_id;
it->face_id =
- merge_faces (it->w, Qfill_column_indicator, 0, DEFAULT_FACE_ID);
+ merge_faces (it->w, Qfill_column_indicator, 0, saved_face_id);
it->c = it->char_to_display =
XFIXNAT (Vdisplay_fill_column_indicator_character);
PRODUCE_GLYPHS (it);
- it->face_id = saved_face;
+ it->face_id = saved_face_id;
it->c = it->char_to_display = ' ';
}
else