diff options
author | Michael Kifer <[email protected]> | 2008-01-09 06:16:07 +0000 |
---|---|---|
committer | Michael Kifer <[email protected]> | 2008-01-09 06:16:07 +0000 |
commit | 65efc5388d0c270796027bff3c4bb4b0b85dac16 (patch) | |
tree | ac702a060aea2375992bfe431b1ae337109d7674 /lisp/ediff-util.el | |
parent | 218b3b7634bd5638c6f7b3fdb26c552127288bc6 (diff) |
2008-01-09 Michael Kifer <[email protected]>
* ediff*.el: commented out declare-function. "make bootstrap"
stops with an error and emacs does not compile with those things in.
Besides, declare-function is not defined in XEmacs.
* ediff-util (eqiff-quit): autoraise minibuffer.
* ediff-diff (ediff-convert-fine-diffs-to-overlays): make it a defin
* viper*.el: commented out declare-function -- not defined in XEmacs.
* viper-ex.el (viper-info-on-file): take care of indiret buffers.
* viper.el (viper-set-hooks, set-cursor-color): set viper-vi-state-cursor-color.
Diffstat (limited to 'lisp/ediff-util.el')
-rw-r--r-- | lisp/ediff-util.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/ediff-util.el b/lisp/ediff-util.el index dd844c9a54..94e0d87bf9 100644 --- a/lisp/ediff-util.el +++ b/lisp/ediff-util.el @@ -2406,7 +2406,9 @@ If it is t, they will be preserved unconditionally. A prefix argument, temporarily reverses the meaning of this variable." (interactive "P") (ediff-barf-if-not-control-buffer) - (let ((ctl-buf (current-buffer))) + (let ((ctl-buf (current-buffer)) + (ctl-frm (selected-frame)) + (minibuffer-auto-raise t)) (if (y-or-n-p (format "Quit this Ediff session%s? " (if (ediff-buffer-live-p ediff-meta-buffer) " & show containing session group" ""))) @@ -2414,6 +2416,8 @@ temporarily reverses the meaning of this variable." (message "") (set-buffer ctl-buf) (ediff-really-quit reverse-default-keep-variants)) + (select-frame ctl-frm) + (raise-frame ctl-frm) (message "")))) @@ -2818,7 +2822,8 @@ up an appropriate window config." ;; ediff-barf-if-not-control-buffer ensures only called from ediff. -(declare-function ediff-version "ediff" ()) +;; declare-function does not exist in XEmacs +;;(declare-function ediff-version "ediff" ())) (defun ediff-status-info () "Show the names of the buffers or files being operated on by Ediff. |