diff options
Diffstat (limited to 'src/window.c')
| -rw-r--r-- | src/window.c | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/src/window.c b/src/window.c index edf60cd8ff3..a0b11e0e320 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -57,7 +57,7 @@ static Lisp_Object Qreplace_buffer_in_windows, Qget_mru_window; | |||
| 57 | static Lisp_Object Qwindow_resize_root_window, Qwindow_resize_root_window_vertically; | 57 | static Lisp_Object Qwindow_resize_root_window, Qwindow_resize_root_window_vertically; |
| 58 | static Lisp_Object Qscroll_up, Qscroll_down, Qscroll_command; | 58 | static Lisp_Object Qscroll_up, Qscroll_down, Qscroll_command; |
| 59 | static Lisp_Object Qsafe, Qabove, Qbelow; | 59 | static Lisp_Object Qsafe, Qabove, Qbelow; |
| 60 | static Lisp_Object Qauto_buffer_name, Qclone_of, Qstate; | 60 | static Lisp_Object Qauto_buffer_name, Qclone_of; |
| 61 | 61 | ||
| 62 | static int displayed_window_lines (struct window *); | 62 | static int displayed_window_lines (struct window *); |
| 63 | static struct window *decode_window (Lisp_Object); | 63 | static struct window *decode_window (Lisp_Object); |
| @@ -5891,9 +5891,8 @@ save_window_save (Lisp_Object window, struct Lisp_Vector *vector, int i) | |||
| 5891 | tem = XCDR (tem)) | 5891 | tem = XCDR (tem)) |
| 5892 | { | 5892 | { |
| 5893 | pers = XCAR (tem); | 5893 | pers = XCAR (tem); |
| 5894 | /* Save values for persistent window parameters whose cdr | 5894 | /* Save values for persistent window parameters. */ |
| 5895 | is either nil or t. */ | 5895 | if (CONSP (pers) && !NILP (XCDR (pers))) |
| 5896 | if (CONSP (pers) && (NILP (XCDR (pers)) || EQ (XCDR (pers), Qt))) | ||
| 5897 | { | 5896 | { |
| 5898 | par = Fassq (XCAR (pers), w->window_parameters); | 5897 | par = Fassq (XCAR (pers), w->window_parameters); |
| 5899 | if (NILP (par)) | 5898 | if (NILP (par)) |
| @@ -5968,7 +5967,9 @@ and for each displayed buffer, where display starts, and the positions of | |||
| 5968 | point and mark. An exception is made for point in the current buffer: | 5967 | point and mark. An exception is made for point in the current buffer: |
| 5969 | its value is -not- saved. | 5968 | its value is -not- saved. |
| 5970 | This also records the currently selected frame, and FRAME's focus | 5969 | This also records the currently selected frame, and FRAME's focus |
| 5971 | redirection (see `redirect-frame-focus'). */) | 5970 | redirection (see `redirect-frame-focus'). The variable |
| 5971 | `window-persistent-parameters' specifies which window parameters are | ||
| 5972 | saved by this function. */) | ||
| 5972 | (Lisp_Object frame) | 5973 | (Lisp_Object frame) |
| 5973 | { | 5974 | { |
| 5974 | register Lisp_Object tem; | 5975 | register Lisp_Object tem; |
| @@ -6506,7 +6507,6 @@ syms_of_window (void) | |||
| 6506 | DEFSYM (Qbelow, "below"); | 6507 | DEFSYM (Qbelow, "below"); |
| 6507 | DEFSYM (Qauto_buffer_name, "auto-buffer-name"); | 6508 | DEFSYM (Qauto_buffer_name, "auto-buffer-name"); |
| 6508 | DEFSYM (Qclone_of, "clone-of"); | 6509 | DEFSYM (Qclone_of, "clone-of"); |
| 6509 | DEFSYM (Qstate, "state"); | ||
| 6510 | 6510 | ||
| 6511 | staticpro (&Vwindow_list); | 6511 | staticpro (&Vwindow_list); |
| 6512 | 6512 | ||
| @@ -6618,28 +6618,28 @@ function `set-window-combination-limit'. */); | |||
| 6618 | 6618 | ||
| 6619 | DEFVAR_LISP ("window-persistent-parameters", Vwindow_persistent_parameters, | 6619 | DEFVAR_LISP ("window-persistent-parameters", Vwindow_persistent_parameters, |
| 6620 | doc: /* Alist of persistent window parameters. | 6620 | doc: /* Alist of persistent window parameters. |
| 6621 | Parameters in this list are saved by `current-window-configuration' and | 6621 | This alist specifies which window parameters shall get saved by |
| 6622 | `window-state-get' and subsequently restored to their previous values by | 6622 | `current-window-configuration' and `window-state-get' and subsequently |
| 6623 | `set-window-configuration' and `window-state-put'. | 6623 | restored to their previous values by `set-window-configuration' and |
| 6624 | `window-state-put'. | ||
| 6624 | 6625 | ||
| 6625 | The car of each entry of this alist is the symbol specifying the | 6626 | The car of each entry of this alist is the symbol specifying the |
| 6626 | parameter. The cdr is one of the following: | 6627 | parameter. The cdr is one of the following: |
| 6627 | 6628 | ||
| 6628 | The symbol `state' means the parameter is saved by `window-state-get' | 6629 | nil means the parameter is neither saved by `window-state-get' nor by |
| 6629 | provided its IGNORE argument is nil. `current-window-configuration' | 6630 | `current-window-configuration'. |
| 6630 | does not save this parameter. | ||
| 6631 | 6631 | ||
| 6632 | nil means the parameter is saved by `current-window-configuration' and, | 6632 | t means the parameter is saved by `current-window-configuration' and, |
| 6633 | provided its IGNORE argument is nil, by `window-state-get'. | 6633 | provided its WRITABLE argument is nil, by `window-state-get'. |
| 6634 | 6634 | ||
| 6635 | t means the parameter is saved unconditionally by both | 6635 | The symbol `writable' means the parameter is saved unconditionally by |
| 6636 | `current-window-configuration' and `window-state-get'. Parameters | 6636 | both `current-window-configuration' and `window-state-get'. Do not use |
| 6637 | without read syntax (like windows or frames) should not use that. | 6637 | this value for parameters without read syntax (like windows or frames). |
| 6638 | 6638 | ||
| 6639 | Parameters not saved by `current-window-configuration' or | 6639 | Parameters not saved by `current-window-configuration' or |
| 6640 | `window-state-get' are left alone by `set-window-configuration' | 6640 | `window-state-get' are left alone by `set-window-configuration' |
| 6641 | respectively are not installed by `window-state-put'. */); | 6641 | respectively are not installed by `window-state-put'. */); |
| 6642 | Vwindow_persistent_parameters = list1 (Fcons (Qclone_of, Qstate)); | 6642 | Vwindow_persistent_parameters = list1 (Fcons (Qclone_of, Qt)); |
| 6643 | 6643 | ||
| 6644 | defsubr (&Sselected_window); | 6644 | defsubr (&Sselected_window); |
| 6645 | defsubr (&Sminibuffer_window); | 6645 | defsubr (&Sminibuffer_window); |