aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--doc/lispref/lists.texi2
-rw-r--r--src/ftcrfont.c5
-rw-r--r--src/ftfont.c5
-rw-r--r--src/window.c11
-rw-r--r--src/xdisp.c5
-rw-r--r--src/xftfont.c6
-rw-r--r--test/lisp/epg-tests.el2
7 files changed, 28 insertions, 8 deletions
diff --git a/doc/lispref/lists.texi b/doc/lispref/lists.texi
index 1548dd49b2f..69f93009520 100644
--- a/doc/lispref/lists.texi
+++ b/doc/lispref/lists.texi
@@ -656,7 +656,7 @@ resulting list. Instead, the sequence becomes the final @sc{cdr}, like
656any other non-list final argument. 656any other non-list final argument.
657 657
658@defun copy-tree tree &optional vecp 658@defun copy-tree tree &optional vecp
659This function returns a copy of the tree @code{tree}. If @var{tree} is a 659This function returns a copy of the tree @var{tree}. If @var{tree} is a
660cons cell, this makes a new cons cell with the same @sc{car} and 660cons cell, this makes a new cons cell with the same @sc{car} and
661@sc{cdr}, then recursively copies the @sc{car} and @sc{cdr} in the 661@sc{cdr}, then recursively copies the @sc{car} and @sc{cdr} in the
662same way. 662same way.
diff --git a/src/ftcrfont.c b/src/ftcrfont.c
index dc1a389c607..afe21b639fc 100644
--- a/src/ftcrfont.c
+++ b/src/ftcrfont.c
@@ -35,8 +35,9 @@ along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. */
35struct ftcrfont_info 35struct ftcrfont_info
36{ 36{
37 struct font font; 37 struct font font;
38 /* The following six members must be here in this order to be 38 /* The following members up to and including 'matrix' must be here
39 compatible with struct ftfont_info (in ftfont.c). */ 39 in this order to be compatible with struct ftfont_info (in
40 ftfont.c). */
40#ifdef HAVE_LIBOTF 41#ifdef HAVE_LIBOTF
41 bool maybe_otf; /* Flag to tell if this may be OTF or not. */ 42 bool maybe_otf; /* Flag to tell if this may be OTF or not. */
42 OTF *otf; 43 OTF *otf;
diff --git a/src/ftfont.c b/src/ftfont.c
index e83eff3ad08..44e0e626ee6 100644
--- a/src/ftfont.c
+++ b/src/ftfont.c
@@ -56,8 +56,9 @@ struct ftfont_info
56{ 56{
57 struct font font; 57 struct font font;
58#ifdef HAVE_LIBOTF 58#ifdef HAVE_LIBOTF
59 /* The following four members must be here in this order to be 59 /* The following members up to and including 'matrix' must be here in
60 compatible with struct xftfont_info (in xftfont.c). */ 60 this order to be compatible with struct xftfont_info (in
61 xftfont.c). */
61 bool maybe_otf; /* Flag to tell if this may be OTF or not. */ 62 bool maybe_otf; /* Flag to tell if this may be OTF or not. */
62 OTF *otf; 63 OTF *otf;
63#endif /* HAVE_LIBOTF */ 64#endif /* HAVE_LIBOTF */
diff --git a/src/window.c b/src/window.c
index 9da77ffc972..14b3364477e 100644
--- a/src/window.c
+++ b/src/window.c
@@ -7176,6 +7176,11 @@ set_window_fringes (struct window *w, Lisp_Object left_width,
7176 w->right_fringe_width = right; 7176 w->right_fringe_width = right;
7177 w->fringes_outside_margins = outside; 7177 w->fringes_outside_margins = outside;
7178 7178
7179 /* This is needed to trigger immediate redisplay of the window
7180 when its fringes are changed, because fringes are redrawn
7181 only if update_window is called, so we must trigger that even
7182 if the window's glyph matrices did not change at all. */
7183 windows_or_buffers_changed = 35;
7179 return w; 7184 return w;
7180 } 7185 }
7181 else 7186 else
@@ -7293,6 +7298,12 @@ set_window_scroll_bars (struct window *w, Lisp_Object width,
7293 wset_horizontal_scroll_bar_type (w, Qnil); 7298 wset_horizontal_scroll_bar_type (w, Qnil);
7294#endif 7299#endif
7295 7300
7301 /* This is needed to trigger immediate redisplay of the window when
7302 scroll bars are changed, because scroll bars are redisplayed only
7303 if more than a single window needs to be considered, see
7304 redisplay_internal. */
7305 if (changed)
7306 windows_or_buffers_changed = 31;
7296 return changed ? w : NULL; 7307 return changed ? w : NULL;
7297} 7308}
7298 7309
diff --git a/src/xdisp.c b/src/xdisp.c
index cb21397e7b9..4201bdc4a75 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -21242,7 +21242,10 @@ maybe_produce_line_number (struct it *it)
21242 if (lnum_face_id != current_lnum_face_id 21242 if (lnum_face_id != current_lnum_face_id
21243 && (EQ (Vdisplay_line_numbers, Qvisual) 21243 && (EQ (Vdisplay_line_numbers, Qvisual)
21244 ? this_line == 0 21244 ? this_line == 0
21245 : this_line == it->pt_lnum)) 21245 : this_line == it->pt_lnum)
21246 /* Avoid displaying the line-number-current-line face on
21247 empty lines beyond EOB. */
21248 && it->what != IT_EOB)
21246 tem_it.face_id = current_lnum_face_id; 21249 tem_it.face_id = current_lnum_face_id;
21247 else 21250 else
21248 tem_it.face_id = lnum_face_id; 21251 tem_it.face_id = lnum_face_id;
diff --git a/src/xftfont.c b/src/xftfont.c
index 85df0d857a2..86b8f222425 100644
--- a/src/xftfont.c
+++ b/src/xftfont.c
@@ -42,8 +42,9 @@ along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>. */
42struct xftfont_info 42struct xftfont_info
43{ 43{
44 struct font font; 44 struct font font;
45 /* The following five members must be here in this order to be 45 /* The following members up to and including 'matrix' must be here
46 compatible with struct ftfont_info (in ftfont.c). */ 46 in this order to be compatible with struct ftfont_info (in
47 ftfont.c). */
47#ifdef HAVE_LIBOTF 48#ifdef HAVE_LIBOTF
48 bool maybe_otf; /* Flag to tell if this may be OTF or not. */ 49 bool maybe_otf; /* Flag to tell if this may be OTF or not. */
49 OTF *otf; 50 OTF *otf;
@@ -51,6 +52,7 @@ struct xftfont_info
51 FT_Size ft_size; 52 FT_Size ft_size;
52 int index; 53 int index;
53 FT_Matrix matrix; 54 FT_Matrix matrix;
55
54 Display *display; 56 Display *display;
55 XftFont *xftfont; 57 XftFont *xftfont;
56 unsigned x_display_id; 58 unsigned x_display_id;
diff --git a/test/lisp/epg-tests.el b/test/lisp/epg-tests.el
index 69c3838f0ae..68350273681 100644
--- a/test/lisp/epg-tests.el
+++ b/test/lisp/epg-tests.el
@@ -108,6 +108,8 @@
108 108
109(ert-deftest epg-decrypt-1 () 109(ert-deftest epg-decrypt-1 ()
110 (with-epg-tests (:require-passphrase t) 110 (with-epg-tests (:require-passphrase t)
111 (with-temp-file (expand-file-name "gpg.conf" epg-tests-home-directory)
112 (insert "ignore-mdc-error"))
111 (should (equal "test" 113 (should (equal "test"
112 (epg-decrypt-string epg-tests-context "\ 114 (epg-decrypt-string epg-tests-context "\
113-----BEGIN PGP MESSAGE----- 115-----BEGIN PGP MESSAGE-----