aboutsummaryrefslogtreecommitdiffstats
path: root/src/window.c
diff options
context:
space:
mode:
authorStefan Monnier2014-04-16 10:00:39 -0400
committerStefan Monnier2014-04-16 10:00:39 -0400
commit63032a0eb9b9c9a8d5f4cae700b83d0dd1e699ce (patch)
treefe5f54d82d291b707f19c0c7471f529d28ca27d6 /src/window.c
parentae5a4398c1751b5d95b4b002f9930dca1b1f1311 (diff)
downloademacs-63032a0eb9b9c9a8d5f4cae700b83d0dd1e699ce.tar.gz
emacs-63032a0eb9b9c9a8d5f4cae700b83d0dd1e699ce.zip
* src/window.c (save_window_save): Lookup window_point_insertion_type in
the right buffer. (Qwindow_point_insertion_type): New var. (syms_of_window): Initialize it. Fixes: debbugs:15457
Diffstat (limited to 'src/window.c')
-rw-r--r--src/window.c7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/window.c b/src/window.c
index f42219cae94..8e8252d3b76 100644
--- a/src/window.c
+++ b/src/window.c
@@ -55,6 +55,7 @@ static Lisp_Object Qwindow_pixel_to_total;
55static Lisp_Object Qscroll_up, Qscroll_down, Qscroll_command; 55static Lisp_Object Qscroll_up, Qscroll_down, Qscroll_command;
56static Lisp_Object Qsafe, Qabove, Qbelow, Qwindow_size, Qclone_of; 56static Lisp_Object Qsafe, Qabove, Qbelow, Qwindow_size, Qclone_of;
57static Lisp_Object Qfloor, Qceiling; 57static Lisp_Object Qfloor, Qceiling;
58static Lisp_Object Qwindow_point_insertion_type;
58 59
59static int displayed_window_lines (struct window *); 60static int displayed_window_lines (struct window *);
60static int count_windows (struct window *); 61static int count_windows (struct window *);
@@ -124,7 +125,7 @@ static int window_initialized;
124/* Hook to run when window config changes. */ 125/* Hook to run when window config changes. */
125static Lisp_Object Qwindow_configuration_change_hook; 126static Lisp_Object Qwindow_configuration_change_hook;
126 127
127/* Used by the function window_scroll_pixel_based */ 128/* Used by the function window_scroll_pixel_based. */
128static int window_scroll_pixel_based_preserve_x; 129static int window_scroll_pixel_based_preserve_x;
129static int window_scroll_pixel_based_preserve_y; 130static int window_scroll_pixel_based_preserve_y;
130 131
@@ -6618,7 +6619,8 @@ save_window_save (Lisp_Object window, struct Lisp_Vector *vector, int i)
6618 else 6619 else
6619 p->pointm = Fcopy_marker (w->pointm, Qnil); 6620 p->pointm = Fcopy_marker (w->pointm, Qnil);
6620 XMARKER (p->pointm)->insertion_type 6621 XMARKER (p->pointm)->insertion_type
6621 = !NILP (Vwindow_point_insertion_type); 6622 = !NILP (buffer_local_value_1 /* Don't signal error if void. */
6623 (Qwindow_point_insertion_type, w->contents));
6622 6624
6623 p->start = Fcopy_marker (w->start, Qnil); 6625 p->start = Fcopy_marker (w->start, Qnil);
6624 p->start_at_line_beg = w->start_at_line_beg ? Qt : Qnil; 6626 p->start_at_line_beg = w->start_at_line_beg ? Qt : Qnil;
@@ -7235,6 +7237,7 @@ on their symbols to be controlled by this variable. */);
7235 DEFVAR_LISP ("window-point-insertion-type", Vwindow_point_insertion_type, 7237 DEFVAR_LISP ("window-point-insertion-type", Vwindow_point_insertion_type,
7236 doc: /* Type of marker to use for `window-point'. */); 7238 doc: /* Type of marker to use for `window-point'. */);
7237 Vwindow_point_insertion_type = Qnil; 7239 Vwindow_point_insertion_type = Qnil;
7240 DEFSYM (Qwindow_point_insertion_type, "window_point_insertion_type");
7238 7241
7239 DEFVAR_LISP ("window-configuration-change-hook", 7242 DEFVAR_LISP ("window-configuration-change-hook",
7240 Vwindow_configuration_change_hook, 7243 Vwindow_configuration_change_hook,