diff options
| author | Martin Rudalics | 2011-11-01 17:21:41 +0100 |
|---|---|---|
| committer | Martin Rudalics | 2011-11-01 17:21:41 +0100 |
| commit | 4ee88440781304fc7003d51e363c3e3a5cc2e8fd (patch) | |
| tree | 208d9e9e7f71484f03cc0dfa2ed981b94540eab3 | |
| parent | 37dcccdd20fb23eaf947fd51787da84f6f18e425 (diff) | |
| download | emacs-4ee88440781304fc7003d51e363c3e3a5cc2e8fd.tar.gz emacs-4ee88440781304fc7003d51e363c3e3a5cc2e8fd.zip | |
Remove unused variable temp-buffer-show-specifiers.
* window.c (temp_output_buffer_show): Don't use
Vtemp_buffer_show_specifiers.
(Vtemp_buffer_show_specifiers): Remove unused variable.
* help.el (with-help-window): Don't reference
temp-buffer-show-specifiers in doc-string.
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/help.el | 5 | ||||
| -rw-r--r-- | src/ChangeLog | 6 | ||||
| -rw-r--r-- | src/window.c | 15 |
4 files changed, 13 insertions, 18 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 97ae0232d55..7be6e030593 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2011-11-01 Martin Rudalics <rudalics@gmx.at> | ||
| 2 | |||
| 3 | * help.el (with-help-window): Don't reference | ||
| 4 | temp-buffer-show-specifiers in doc-string. | ||
| 5 | |||
| 1 | 2011-10-31 Andreas Schwab <schwab@linux-m68k.org> | 6 | 2011-10-31 Andreas Schwab <schwab@linux-m68k.org> |
| 2 | 7 | ||
| 3 | * subr.el (keymap--menu-item-with-binding): Ignore item if not a | 8 | * subr.el (keymap--menu-item-with-binding): Ignore item if not a |
diff --git a/lisp/help.el b/lisp/help.el index bc3d863f357..506889c210e 100644 --- a/lisp/help.el +++ b/lisp/help.el | |||
| @@ -1125,10 +1125,7 @@ HELP-WINDOW is the window used for displaying the help buffer." | |||
| 1125 | (defmacro with-help-window (buffer-name &rest body) | 1125 | (defmacro with-help-window (buffer-name &rest body) |
| 1126 | "Display buffer with name BUFFER-NAME in a help window evaluating BODY. | 1126 | "Display buffer with name BUFFER-NAME in a help window evaluating BODY. |
| 1127 | Select help window if the actual value of the user option | 1127 | Select help window if the actual value of the user option |
| 1128 | `help-window-select' says so. Return last value in BODY. | 1128 | `help-window-select' says so. Return last value in BODY." |
| 1129 | |||
| 1130 | You can specify where and how to show the buffer by binding the | ||
| 1131 | variable `temp-buffer-show-specifiers' to an appropriate value." | ||
| 1132 | (declare (indent 1) (debug t)) | 1129 | (declare (indent 1) (debug t)) |
| 1133 | `(progn | 1130 | `(progn |
| 1134 | ;; Make `help-window-point-marker' point nowhere. The only place | 1131 | ;; Make `help-window-point-marker' point nowhere. The only place |
diff --git a/src/ChangeLog b/src/ChangeLog index 0bb16514b58..37635555a0f 100644 --- a/src/ChangeLog +++ b/src/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2011-11-01 Martin Rudalics <rudalics@gmx.at> | ||
| 2 | |||
| 3 | * window.c (temp_output_buffer_show): Don't use | ||
| 4 | Vtemp_buffer_show_specifiers. | ||
| 5 | (Vtemp_buffer_show_specifiers): Remove unused variable. | ||
| 6 | |||
| 1 | 2011-10-30 Eli Zaretskii <eliz@gnu.org> | 7 | 2011-10-30 Eli Zaretskii <eliz@gnu.org> |
| 2 | 8 | ||
| 3 | * xdisp.c (try_cursor_movement): Make sure ROW isn't decremented | 9 | * xdisp.c (try_cursor_movement): Make sure ROW isn't decremented |
diff --git a/src/window.c b/src/window.c index 38f16c91f34..422073b1bd3 100644 --- a/src/window.c +++ b/src/window.c | |||
| @@ -3185,10 +3185,7 @@ temp_output_buffer_show (register Lisp_Object buf) | |||
| 3185 | call1 (Vtemp_buffer_show_function, buf); | 3185 | call1 (Vtemp_buffer_show_function, buf); |
| 3186 | else | 3186 | else |
| 3187 | { | 3187 | { |
| 3188 | window = display_buffer (buf, Vtemp_buffer_show_specifiers, Qnil); | 3188 | window = display_buffer (buf, Qnil, Qnil); |
| 3189 | /* Reset Vtemp_buffer_show_specifiers immediately so it won't | ||
| 3190 | affect subsequent calls. */ | ||
| 3191 | Vtemp_buffer_show_specifiers = Qnil; | ||
| 3192 | 3189 | ||
| 3193 | if (!EQ (XWINDOW (window)->frame, selected_frame)) | 3190 | if (!EQ (XWINDOW (window)->frame, selected_frame)) |
| 3194 | Fmake_frame_visible (WINDOW_FRAME (XWINDOW (window))); | 3191 | Fmake_frame_visible (WINDOW_FRAME (XWINDOW (window))); |
| @@ -6460,16 +6457,6 @@ If this function is used, then it must do the entire job of showing | |||
| 6460 | the buffer; `temp-buffer-show-hook' is not run unless this function runs it. */); | 6457 | the buffer; `temp-buffer-show-hook' is not run unless this function runs it. */); |
| 6461 | Vtemp_buffer_show_function = Qnil; | 6458 | Vtemp_buffer_show_function = Qnil; |
| 6462 | 6459 | ||
| 6463 | DEFVAR_LISP ("temp-buffer-show-specifiers", Vtemp_buffer_show_specifiers, | ||
| 6464 | doc: /* Buffer display specifiers used by `with-output-to-temp-buffer'. | ||
| 6465 | These specifiers are passed by `with-output-to-temp-buffer' as second | ||
| 6466 | argument to `display-buffer'. Applications should only let-bind this | ||
| 6467 | around a call to `with-output-to-temp-buffer'. | ||
| 6468 | |||
| 6469 | For a description of buffer display specifiers see the variable | ||
| 6470 | `display-buffer-alist'. */); | ||
| 6471 | Vtemp_buffer_show_specifiers = Qnil; | ||
| 6472 | |||
| 6473 | DEFVAR_LISP ("minibuffer-scroll-window", Vminibuf_scroll_window, | 6460 | DEFVAR_LISP ("minibuffer-scroll-window", Vminibuf_scroll_window, |
| 6474 | doc: /* Non-nil means it is the window that C-M-v in minibuffer should scroll. */); | 6461 | doc: /* Non-nil means it is the window that C-M-v in minibuffer should scroll. */); |
| 6475 | Vminibuf_scroll_window = Qnil; | 6462 | Vminibuf_scroll_window = Qnil; |