From 8434363ba8e148c4b239576d734f3e52486cd074 Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Sun, 18 Apr 2004 10:54:06 +0000 Subject: Obey proof-eagerly-raise in proof-layout-windows. --- generic/pg-response.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'generic/pg-response.el') diff --git a/generic/pg-response.el b/generic/pg-response.el index 88cf9c71..0d4843d4 100644 --- a/generic/pg-response.el +++ b/generic/pg-response.el @@ -161,7 +161,8 @@ Internal variable, setting this will have no effect!") (defun proof-layout-windows () "Refresh the display of windows according to current display mode. -This uses a canonical layout." +This uses a canonical layout. +It obeys the setting of `proof-eagerly-raise' for multiple frame mode." (interactive) (cond (proof-multiple-frames-enable @@ -169,7 +170,8 @@ This uses a canonical layout." (if proof-script-buffer (switch-to-buffer proof-script-buffer)) (proof-map-buffers (proof-associated-buffers) - (proof-display-and-keep-buffer (current-buffer))) + (if proof-eagerly-raise + (proof-display-and-keep-buffer (current-buffer)))) ;; Restore an existing frame configuration (seems buggy, typical) (if pg-frame-configuration (set-frame-configuration pg-frame-configuration 'nodelete))) -- cgit v1.2.3