diff options
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/help-macro.el | 2 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 0d65baebee2..21564f5daa5 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2012-12-17 Kelly Dean <kellydeanch@yahoo.com> (tiny change) | ||
| 2 | |||
| 3 | * help-macro.el (make-help-screen): Instead of switch-to-buffer | ||
| 4 | use pop-to-buffer with NORECORD argument t. As buffer name use | ||
| 5 | *Metahelp* with a leading space (Bug#13190). | ||
| 6 | |||
| 1 | 2012-12-16 Romain Francoise <romain@orebokech.com> | 7 | 2012-12-16 Romain Francoise <romain@orebokech.com> |
| 2 | 8 | ||
| 3 | * files.el (file-extended-attributes) | 9 | * files.el (file-extended-attributes) |
diff --git a/lisp/help-macro.el b/lisp/help-macro.el index 63ae02eb90d..78972344152 100644 --- a/lisp/help-macro.el +++ b/lisp/help-macro.el | |||
| @@ -134,7 +134,7 @@ and then returns." | |||
| 134 | (when (or (eq char ??) (eq char help-char) | 134 | (when (or (eq char ??) (eq char help-char) |
| 135 | (memq char help-event-list)) | 135 | (memq char help-event-list)) |
| 136 | (setq config (current-window-configuration)) | 136 | (setq config (current-window-configuration)) |
| 137 | (switch-to-buffer-other-window "*Help*") | 137 | (pop-to-buffer " *Metahelp*" nil t) |
| 138 | (and (fboundp 'make-frame) | 138 | (and (fboundp 'make-frame) |
| 139 | (not (eq (window-frame (selected-window)) | 139 | (not (eq (window-frame (selected-window)) |
| 140 | prev-frame)) | 140 | prev-frame)) |