X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fwindow.el;h=8c4bba495638e53452b3b649c84787321a5a3a2a;hb=21a38f2a09ea33809fccf7bcb40ae530f6c707df;hp=faac28fba5282a501f60ea0000ad9741937135ff;hpb=f3ec20f455f3f1212d2c5ee4cadc984330da9c38;p=chise%2Fxemacs-chise.git- diff --git a/lisp/window.el b/lisp/window.el index faac28f..8c4bba4 100644 --- a/lisp/window.el +++ b/lisp/window.el @@ -295,8 +295,8 @@ or if the window is the only window of its frame." (select-frame frame)))) ;; check to make sure that the window is the full width ;; of the frame - (eq (nth 2 edges) - (frame-pixel-width)) + (window-leftmost-p window) + (window-rightmost-p window) (zerop (nth 0 edges)) ;; The whole buffer must be visible. (pos-visible-in-window-p (point-min) window) @@ -351,5 +351,4 @@ Any other non-nil value means search frames on all devices." minibuf all-frames device) wins)) - ;;; window.el ends here