• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10/emacs-93/emacs/lisp/

Lines Matching +defs:frame +defs:visible

38 (defvar bottom-toolbar-visible-p)
306 (make-local-variable 'ediff-prefer-iconified-control-frame)
432 ;; In all other cases, ediff-visible-region sets visibility bounds to
435 (setq ediff-visible-bounds ediff-narrow-bounds)
436 (setq ediff-visible-bounds ediff-wide-bounds))
542 (ediff-visible-region)
565 (set-buffer ctl-buf) ; we are in control frame but just in case
589 ;; In multiframe, toolbar is set in ediff-setup-control-frame
780 (ediff-visible-region)
802 (raise-frame (window-frame ediff-window-A)))
804 (raise-frame (window-frame ediff-window-B)))
806 (raise-frame (window-frame ediff-window-C)))))
808 (frame-live-p ediff-control-frame)
810 (not (ediff-frame-iconified-p ediff-control-frame)))
811 (raise-frame ediff-control-frame))
814 (let ((control-frame ediff-control-frame)
834 (not (ediff-frame-iconified-p ediff-control-frame)))
837 control-frame
879 ;; visible.
882 (let ((window (ediff-get-visible-buffer-window ediff-ancestor-buffer))
909 (frame-A (if wind-A (window-frame wind-A)))
910 (frame-B (if wind-B (window-frame wind-B)))
911 (frame-C (if wind-C (window-frame wind-C))))
912 (if (or (eq frame-A frame-B)
913 (not (frame-live-p frame-A))
914 (not (frame-live-p frame-B))
916 (or (not (frame-live-p frame-C))
917 (eq frame-A frame-C) (eq frame-B frame-C))))
994 (cond ((setq wind (ediff-get-visible-buffer-window ediff-ancestor-buffer))
995 (raise-frame (window-frame wind)))
1018 ;; remember the icon status of the control frame when the user requested
1021 (setq ediff-prefer-iconified-control-frame
1022 (ediff-frame-iconified-p ediff-control-frame)))
1085 (select-window (ediff-get-visible-buffer-window buf))
1180 (wide-visibility-p (eq ediff-visible-bounds ediff-wide-bounds))
1265 (setq ediff-visible-bounds ediff-wide-bounds)
1266 (setq ediff-visible-bounds ediff-narrow-bounds))
1287 (modify-frame-parameters
1288 ediff-wide-display-frame ediff-wide-display-orig-parameters)
1304 "Switch from multiframe display to single-frame display and back.
1361 ;;(selected-frame).
1368 (set-specifier bottom-toolbar (list (selected-frame) nil))
1369 (set-specifier bottom-toolbar-visible-p (list (selected-frame) nil)))
1377 (defun ediff-make-bottom-toolbar (&optional frame)
1380 (setq frame (or frame (selected-frame)))
1386 (list frame (if (ediff-3way-comparison-job)
1388 (set-specifier bottom-toolbar-visible-p (list frame t))
1390 (list frame ediff-toolbar-height)))
1396 (set-specifier bottom-toolbar-height (list frame 0)) ; xemacs
1436 (if (eq ediff-visible-bounds ediff-wide-bounds)
1437 (setq ediff-visible-bounds ediff-narrow-bounds)
1438 (setq ediff-visible-bounds ediff-wide-bounds))
1441 ;; Narrow bufs A/B/C to ediff-visible-bounds. If this is currently set to
1447 (defun ediff-visible-region ()
1452 ;; If ediff-*-regions/windows, ediff-visible-bounds is already set
1455 (setq ediff-visible-bounds ediff-wide-bounds))
1457 'A ediff-visible-bounds))
1459 'B ediff-visible-bounds))
1461 'C ediff-visible-bounds))
1629 (if (pos-visible-in-window-p end)
1638 (if (pos-visible-in-window-p end)
1733 (ediff-visible-region)
1771 (ediff-visible-region)
1783 (ediff-visible-region)
1820 (ediff-visible-region)
2438 ;; Since for other job names ediff-visible-region sets
2439 ;; ediff-visible-bounds to ediff-wide-bounds, the settings below are
2442 (setq ediff-visible-bounds ediff-wide-bounds)
2443 (setq ediff-visible-bounds ediff-narrow-bounds))
2446 (ediff-visible-region)
2461 ;; suitable working frame
2462 (warp-frame (if (and (ediff-window-display-p) (eq ediff-grab-mouse t))
2464 (window-frame ediff-window-A))
2466 (window-frame ediff-window-B))
2467 (t (next-frame))))))
2533 (setq warp-frame ; if mouse is over a reasonable frame, use it
2534 (cond ((ediff-good-frame-under-mouse))
2535 (t warp-frame)))
2536 (if (and (ediff-window-display-p) (frame-live-p warp-frame) ediff-grab-mouse)
2538 warp-frame
2539 (frame-selected-window warp-frame))
2545 ;; Returns frame under mouse, if this frame is not a minibuffer
2546 ;; frame. Otherwise: nil
2547 (defun ediff-good-frame-under-mouse ()
2548 (let ((frame-or-win (car (mouse-position)))
2550 frame obj-ok)
2553 (frame-live-p frame-or-win)
2554 (window-live-p frame-or-win)))
2556 (setq frame (if ediff-emacs-p frame-or-win (window-frame frame-or-win))
2558 (buffer-name (window-buffer (frame-selected-window frame)))))
2561 frame)))
2580 (ctl-wind (ediff-get-visible-buffer-window ctl-buf))
2581 (ctl-frame ediff-control-frame)
2583 (main-frame (cond ((window-live-p ediff-window-A)
2584 (window-frame ediff-window-A))
2586 (window-frame ediff-window-B)))))
2598 ;; delete control frame or window
2599 (cond ((and (ediff-window-display-p) (frame-live-p ctl-frame))
2600 (delete-frame ctl-frame))
2610 (if (frame-live-p main-frame)
2611 (select-frame main-frame))
2613 ;; display only if not visible
2615 (or (ediff-get-visible-buffer-window buff-B)
2619 (or (ediff-get-visible-buffer-window buff-A)
2621 (if (and (ediff-get-visible-buffer-window buff-B)
2628 (or (ediff-get-visible-buffer-window buff-C)
2630 (if (and (or (ediff-get-visible-buffer-window buff-A)
2631 (ediff-get-visible-buffer-window buff-B))
2665 (let ((wind (ediff-get-visible-buffer-window buff))
2764 (buf-A-wind (ediff-get-visible-buffer-window buf-A))
2765 (buf-B-wind (ediff-get-visible-buffer-window buf-B))
2766 (buf-C-wind (ediff-get-visible-buffer-window buf-C))
2776 (if (and (ediff-window-display-p) (frame-live-p ediff-control-frame))
2777 (iconify-frame ediff-control-frame)
2837 (raise-frame (selected-frame))
2926 (if (frame-live-p ediff-control-frame)
2927 (ediff-reset-mouse ediff-control-frame))
3352 (setq wind (ediff-get-visible-buffer-window cloned-buff))
3472 (raise-frame (selected-frame)))))
3473 (if (frame-live-p ediff-control-frame)
3474 (ediff-reset-mouse ediff-control-frame))
3818 ;; Like other-buffer, but prefers visible buffers and ignores temporary or
3831 visible-dired-buffers
3846 ;; significant-buffers must be visible and not belong
3850 ;; ones visible (and there are at least two of them).
3851 ;; Also, any visible window not on the exclusion list that is first in
3859 ((not (ediff-get-visible-buffer-window x)) nil)
3872 ;; dired buffs are the only ones visible.
3873 (setq visible-dired-buffers
3874 (cons x visible-dired-buffers)))
3891 (> (length visible-dired-buffers) 0))
3892 (setq clean-significant-buffers visible-dired-buffers))
3964 ediff-control-frame
3965 ediff-control-frame-parameters
3966 ediff-control-frame-position-function
3967 ediff-prefer-iconified-control-frame