;ELC   
;;; Compiled by cyd@localhost on Mon Apr 23 22:20:43 2007
;;; from file /home/cyd/emacs/lisp/ediff-wind.el
;;; in Emacs version 22.0.99
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`ediff-wind.el' was compiled for Emacs 19.29 or later"))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(byte-code "\301\302!\210\203 \303\304\305\217\210\202 \306\307\310\"\210\311\312\303\313\314\315\316\317\316\320&	\207" [ediff-xemacs-p require ediff-init nil (byte-code "\300\301!\207" [require ediff-tbar] 2) ((error (byte-code "\300\301\302\"\207" [defalias ediff-compute-toolbar-width #[nil "\300\207" [0] 1]] 3))) defalias ediff-compute-toolbar-width #[nil "\300\207" [0] 1] custom-declare-group ediff-window "Ediff window manipulation." :prefix "ediff-" :group ediff frames] 10)
#@1007 *Function called to set up windows.
Ediff provides a choice of two functions: `ediff-setup-windows-plain', for
doing everything in one frame, and `ediff-setup-windows-multiframe',
which sets the control panel in a separate frame.  Also, if the latter
function detects that one of the buffers A/B is seen in some other frame,
it will try to keep that buffer in that frame.

If you don't like the two functions provided---write your own one.
The basic guidelines:
    1. It should leave the control buffer current and the control window
       selected.
    2. It should set `ediff-window-A', `ediff-window-B', `ediff-window-C',
       and `ediff-control-window' to contain window objects that display
       the corresponding buffers.
    3. It should accept the following arguments:
       buffer-A, buffer-B, buffer-C, control-buffer
       Buffer C may not be used in jobs that compare only two buffers.
If you plan to do something fancy, take a close look at how the two
provided functions are written.
(custom-declare-variable 'ediff-window-setup-function '(if (ediff-window-display-p) 'ediff-setup-windows-multiframe 'ediff-setup-windows-plain) '(#$ . -1057) :type '(choice (const :tag "Multi Frame" ediff-setup-windows-multiframe) (const :tag "Single Frame" ediff-setup-windows-plain) (function :tag "Other function")) :group 'ediff-window)
#@2 
(defvar ediff-multiframe nil (#$ . 2409))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-multiframe put permanent-local t] 4)
#@2 
(defvar ediff-merge-window-share 0.45 (#$ . 2576))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-merge-window-share put permanent-local t] 4)
#@2 
(defvar ediff-control-window nil (#$ . 2760))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-control-window put permanent-local t] 4)
#@2 
(defvar ediff-window-A nil (#$ . 2935))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-window-A put permanent-local t] 4)
#@2 
(defvar ediff-window-B nil (#$ . 3098))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-window-B put permanent-local t] 4)
#@2 
(defvar ediff-window-C nil (#$ . 3261))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-window-C put permanent-local t] 4)
#@2 
(defvar ediff-window-config-saved "" (#$ . 3424))
(byte-code "\301\302!\210\303\302\304\305#\210\306B\307\310!\207" [current-load-list make-variable-buffer-local ediff-window-config-saved put permanent-local t ediff-window-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-window-alist #1#)) ((A . ediff-window-A) (65 . ediff-window-A) (B . ediff-window-B) (66 . ediff-window-B) (C . ediff-window-C) (67 . ediff-window-C))] 4)
#@407 *The function used to split the main window between buffer-A and buffer-B.
You can set it to a horizontal split instead of the default vertical split
by setting this variable to `split-window-horizontally'.
You can also have your own function to do fancy splits.
This variable has no effect when buffer-A/B are shown in different frames.
In this case, Ediff will use those frames to display these buffers.
(custom-declare-variable 'ediff-split-window-function ''split-window-vertically '(#$ . -3865) :type 'function :group 'ediff-window)
#@407 *The function used to split the main window between buffer-A and buffer-B.
You can set it to a vertical split instead of the default horizontal split
by setting this variable to `split-window-vertically'.
You can also have your own function to do fancy splits.
This variable has no effect when buffer-A/B/C are shown in different frames.
In this case, Ediff will use those frames to display these buffers.
(custom-declare-variable 'ediff-merge-split-window-function ''split-window-horizontally '(#$ . -4410) :type 'function :group 'ediff-window)
#@91 Frame parameters for displaying Ediff Control Panel.
Used internally---not a user option.
(defconst ediff-control-frame-parameters (byte-code "\300\301\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321!\203 \321 T\202 \322B\323\320\324!\203+ \324 T\202, \322B\257\207" [(name . "Ediff") (minibuffer) (user-position . t) (vertical-scroll-bars) (scrollbar-width . 0) (scrollbar-height . 0) (menu-bar-lines . 0) (tool-bar-lines . 0) (left-fringe . 0) (right-fringe . 0) (auto-lower) (auto-raise . t) (visibility) (width . 1) (height . 1) top fboundp ediff-display-pixel-height 3000 left ediff-display-pixel-width] 19) (#$ . 4962))
#@2 
(defvar ediff-mouse-pixel-position nil (#$ . 5612))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-mouse-pixel-position put permanent-local t] 4)
#@97 If the user moves mouse more than this many pixels, Ediff won't warp mouse into control window.
(defvar ediff-mouse-pixel-threshold 30 (#$ . 5800))
#@232 *If t, Ediff will always grab the mouse and put it in the control frame.
If 'maybe, Ediff will do it sometimes, but not after operations that require
relatively long time.  If nil, the mouse will be entirely user's
responsibility.
(custom-declare-variable 'ediff-grab-mouse 't '(#$ . -5955) :type 'boolean :group 'ediff-window)
#@257 Function to call to determine the desired location for the control panel.
Expects three parameters: the control buffer, the desired width and height
of the control frame.  It returns an association list
of the form ((top . <position>) (left . <position>))
(custom-declare-variable 'ediff-control-frame-position-function ''ediff-make-frame-position '(#$ . 6290) :type 'function :group 'ediff-window)
#@275 *The upward shift of control frame from the top of buffer A's frame.
Measured in pixels.
This is used by the default control frame positioning function,
`ediff-make-frame-position'.  This variable is provided for easy
customization of the default control frame positioning.
(custom-declare-variable 'ediff-control-frame-upward-shift '42 '(#$ . -6696) :type 'integer :group 'ediff-window)
#@332 *The leftward shift of control frame from the right edge of buf A's frame.
Measured in characters.
This is used by the default control frame positioning function,
`ediff-make-frame-position' to adjust the position of the control frame
when it shows the short menu.  This variable is provided for easy
customization of the default.
(custom-declare-variable 'ediff-narrow-control-frame-leftward-shift '(if ediff-xemacs-p 7 3) '(#$ . -7091) :type 'integer :group 'ediff-window)
#@331 *The rightward shift of control frame from the left edge of buf A's frame.
Measured in characters.
This is used by the default control frame positioning function,
`ediff-make-frame-position' to adjust the position of the control frame
when it shows the full menu.  This variable is provided for easy
customization of the default.
(custom-declare-variable 'ediff-wide-control-frame-rightward-shift '7 '(#$ . -7573) :type 'integer :group 'ediff-window)
#@2 
(defvar ediff-wide-display-p nil (#$ . 8029))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-wide-display-p put permanent-local t] 4)
#@85 Frame parameters to be restored when the user wants to toggle the wide
display off.
(defvar ediff-wide-display-orig-parameters nil (#$ . 8205))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-wide-display-orig-parameters put permanent-local t] 4)
#@36 Frame to be used for wide display.
(defvar ediff-wide-display-frame nil (#$ . 8492))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-wide-display-frame put permanent-local t] 4)
#@373 The value is a function that is called to create a wide display.
The function is called without arguments.  It should resize the frame in
which buffers A, B, and C are to be displayed, and it should save the old
frame parameters in `ediff-wide-display-orig-parameters'.
The variable `ediff-wide-display-frame' should be set to contain
the frame used for the wide display.
(defvar ediff-make-wide-display-function 'ediff-make-wide-display (#$ . 8711))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-make-wide-display-function put permanent-local t] 4)
#@2 
(defvar ediff-control-frame nil (#$ . 9302))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-control-frame put permanent-local t] 4)
#@435 *If t, keep control panel iconified when help message is off.
This has effect only on a windowing system.
If t, hitting `?' to toggle control panel off iconifies it.

This is only useful in Emacs and only for certain kinds of window managers,
such as TWM and its derivatives, since the window manager must permit
keyboard input to go into icons.  XEmacs completely ignores keyboard input
into icons, regardless of the window manager.
(custom-declare-variable 'ediff-prefer-iconified-control-frame 'nil '(#$ . -9477) :type 'boolean :group 'ediff-window)
(defalias 'ediff-get-window-by-clicking #[(wind prev-wind wind-number) "\304\305\306	\"\210\307 \211\310\311\312\313\314!\"\")\204+ \315\316!\203# \317\316!\210\305\320	\"\210\202 \307 \210\211:\203; \3168\202A \321 `\322\323F)\323\n8)\211)\207" [event wind-number position wind nil message "Select windows by clicking.  Please click on Window %d " ediff-read-event string-match "mouse" format "%S" event-basic-type sit-for 1 beep "Please click on Window %d " selected-window (0 . 0) 0] 7])
(defalias 'ediff-select-lowest-window #[nil "\306 \307 AAA@\212\310\311!\210\306 )\312\205B \313 \307\f!AAA@	W\203. \f\314\f!\210\n\f=\203> \314!\210\315*\202 ,\207" [lowest-window bottom-edge last-window window-search this-window next-bottom-edge selected-window window-edges other-window -1 t next-window select-window nil] 2])
(defalias 'ediff-setup-windows #[(buffer-A buffer-B buffer-C control-buffer) "\306\307!\210\310 \311 =\203 \312\313!\210\314 \204 \315\316	!\204H 	\2038 \317	!\2038 \320\317	!!\2038 r	q\210)\202A \n\321=\206A \322!\f	$\210\306\323!\207" [ediff-window-setup-function control-buffer this-command ediff-KILLED-VITAL-BUFFER buffer-A buffer-B run-hooks ediff-before-setup-windows-hook selected-window minibuffer-window other-window 1 ediff-window-display-p ediff-setup-windows-plain ediff-keep-window-config get-buffer buffer-name ediff-quit error ediff-after-setup-windows-hook buffer-C] 5])
(defalias 'ediff-setup-windows-plain #[(buffer-A buffer-B buffer-C control-buffer) "\203 \306!\203 \307\306!!\203 rq\210\310)\202& \n\311=\204& \312!\210\f\2033 \313$\207\314$\207" [control-buffer ediff-multiframe this-command ediff-KILLED-VITAL-BUFFER ediff-merge-job buffer-A get-buffer buffer-name nil ediff-quit error ediff-setup-windows-plain-merge ediff-setup-windows-plain-compare buffer-B buffer-C] 5])
(defalias 'ediff-setup-windows-plain-merge #[(buf-A buf-B buf-C control-buffer) "\306!\210\307\310\211\211\211\211\211\2035 \311!\2035 \312\311!!\2035 rq\210)\202A \313=\204A \314!\210\315 \210\316 \210\317 \210\320!\210\321\307!\210\322\323\324 _!]\325!\210\326 \316\322\324 \fZ]!\210\326 =\203w \321\307!\210\326 \325!\210\327!\210 \210\326 =\203\222 \321\307!\210\325 !\210\326 \203\275 \311!\203\275 \312\311!!\203\275 rq\210!\n\"	#)\202\311 \313=\204\311 \314!\210\317 \210\320!.\207" [control-buffer wind-C wind-B wind-A merge-window-lines merge-window-share ediff-destroy-control-frame 1 nil get-buffer buffer-name ediff-quit error delete-other-windows split-window-vertically ediff-select-lowest-window ediff-setup-control-buffer other-window 2 round window-height switch-to-buffer selected-window select-window split-window-function window-min-height ediff-merge-window-share ediff-split-window-function this-command ediff-KILLED-VITAL-BUFFER buf-A buf-C buf-B ediff-window-A ediff-window-B ediff-window-C] 7])
(defalias 'ediff-setup-windows-plain-compare #[(buf-A buf-B buf-C control-buffer) "\306!\210\307\310\211\211\211\211\211\211\211\203a \311!\203a \312\311!!\203a rq\210@\313!\205@ \314!)A@\313!\205S \314!) !)\202m \"\315=\204m \316#!\210\317 \210\320 \210\321 \210\322!\210\323\307!\210\324$!\210\325 \203\237 \320=\203\230 \326!\202\233 \327!\330\245!\210\325 =\203\260 \323\307!\210\324%!\210\325 \203\324  \210\325 \n=\203\314 \323\307!\210\324&!\210\325 \203\367 \311!\203\367 \312\311!!\203\367 rq\210'\n(	))\202\"\315=\204\316#!\210*\203\331\"\210\331\n\f\"\210\321 \210\322!.	\207" [control-buffer wind-C wind-B wind-A wind-B-start wind-A-start ediff-destroy-control-frame 1 nil get-buffer buffer-name ediff-overlayp overlay-start ediff-quit error delete-other-windows split-window-vertically ediff-select-lowest-window ediff-setup-control-buffer other-window switch-to-buffer selected-window window-height window-width 3 set-window-start three-way-comparison wind-width-or-height split-window-function window-min-height ediff-narrow-bounds overl ediff-split-window-function ediff-3way-comparison-job this-command ediff-KILLED-VITAL-BUFFER buf-A buf-B buf-C ediff-window-A ediff-window-B ediff-window-C ediff-windows-job] 9])
(defalias 'ediff-setup-windows-multiframe #[(buf-A buf-B buf-C control-buf) "\203 \306!\203 \307\306!!\203 rq\210\310)\202& \n\311=\204& \312!\210\f\2033 \313$\207\314$\207" [control-buf ediff-multiframe this-command ediff-KILLED-VITAL-BUFFER ediff-merge-job buf-A get-buffer buffer-name t ediff-quit error ediff-setup-windows-multiframe-merge ediff-setup-windows-multiframe-compare buf-B buf-C] 5])
(defalias 'ediff-setup-windows-multiframe-merge #[(buf-A buf-B buf-C control-buf) "\306\307!\210\310\311	!\311!\311!!\n\205 \312\n!\"\f\205# \312\f!#!\205. \312!!$%\203P \313%!\203P \314\313%!!\203P r%q\210&)\202[ '\315=\206[ \316(!)%\203} \313%!\203} \314\313%!!\203} r%q\210*)\202\210 '\315=\206\210 \316(!+\317 ,\320 -)\206\334 \"$\206\240 -=\206\334 #$\206\255 -=\206\334 \321\"!?\206\334 \321#!?\206\334 \322\n!?\206\334 \322\f!?\206\334 \"#=\205\334 \321$!?\211.?\205\350 \"#=/%\203\n\313%!\203\n\314\313%!!\203\nr%q\2100)\202'\315=\206\316(!1\323\21123\323\21145\3236\324\n!\203C.\204C/\204C\325\n!\210\326 \210\317 \3274\324\f!\203`.\204`/\204`\325\f!\210\326 \210\317 \3275\324!!\203\202\322!!\203\202.\204\202\325!!\210\326 \210\317 !\3276/\203\263\324\n!\203\263\325\n!\210\326 \210\317 + \210\317 \n=\203\246\330\310!\210\331!\210\317 \327\21145.\2032\310\"#=\203\331#$=\203\331\321\"!\203\331\332\"!\210\202\334\306 \210\326 \210\333\334\335 1_!]2\331	!\210\317 \336\333\335 2Z]!\210\317 \n=\203\330\310!\210\317 !\331!\210\325\n!\210+ \210\317 \n=\203!\330\310!\210\331!\210\317 \327\21145\3276)4\204F\325,!\210\326 \210\331	!\210\317 5\204Z\325,!\210\326 \210\331!\210\317 6\204o\325,!\210\326 \210\331!\210\317 !%\203\245\313%!\203\245\314\313%!!\203\245r%q\210\n7\f8!9\3127!\"\312\337\"!!3)\202\261'\315=\204\261\316(!\210\340%3\".\207" [window-min-height buf-A wind-A buf-B wind-B buf-C ediff-skip-unsuitable-frames ok-unsplittable 1 ediff-get-visible-buffer-window window-frame get-buffer buffer-name ediff-quit error selected-window selected-frame frame-live-p ediff-window-ok-for-display nil window-live-p select-window delete-other-windows t other-window switch-to-buffer select-frame 2 round window-height split-window-vertically minibuffer-window ediff-setup-control-frame wind-C frame-A frame-B frame-C control-buf ediff-wide-display-p this-command ediff-KILLED-VITAL-BUFFER force-one-frame ediff-split-window-function split-window-function orig-wind orig-frame use-same-frame use-same-frame-for-AB ediff-merge-window-share merge-window-share merge-window-lines designated-minibuffer-frame done-A done-B done-C ediff-window-A ediff-window-B ediff-window-C] 5])
(defalias 'ediff-setup-windows-multiframe-compare #[(buf-A buf-B buf-C control-buf) "\306\307!\210\310\311	!\311!\311!$\n\205 \312\n!%\f\205# \312\f!&$\205. \312$!'(\203R \313(!\203R \314\313(!!\203R r(q\210\315)!)\202] *\316=\206] \317+!,(\203 \313(!\203 \314\313(!!\203 r(q\210-)\202\212 *\316=\206\212 \317+!.(\203\254 \313(!\203\254 \314\313(!!\203\254 r(q\210/)\202\267 *\316=\206\267 \317+!0(\203\331 \313(!\203\331 \314\313(!!\203\331 r(q\2101)\202\344 *\316=\206\344 \317+!2\320 3.\206`%&=\206`\321\n!?\206`\321\f!?\206`2\203:%'=\206`&'=\206`\321$!?\206`\315%!?\206`\315&!?\206`\315'!?\206`\315&!\204N,\206`%\322 =\206`\315%!?\205`,\206`&\322 =4\323\21156\323\21178\323\2119:(\203\271\313(!\203\271\314\313(!!\203\271r(q\210;@<\324<!\205\236\325<!)5;A@<\324<!\205\262\325<!)6)\202\305*\316=\204\305\317+!\210\326\n!\203\3354\204\335\327\n!\210\330 \210\320 \3318\326\f!\203\3654\204\365\327\f!\210\330 \210\320 \3319\326$!\2034\204\327$!\210\330 \210\320 $\331:4\203\225\323=%&=\203/\315%!\203/\332%!\210\2022\306 \210\330 \210\333	!\210\320 2\203U0\334=\203N\335\n!\202Q\336\n!\337\245=0=!\210\320 \n=\203f\340\310!\210\333!\210\320 2\203\2130 \210\320 \n\fD>\203\203\340\310!\210\333!\210\320 $\331\21189\331:)8\204\251\3273!\210\330 \210\333	!\210\320 9\204\275\3273!\210\330 \210\333!\210\320 2\203\327:\204\327\3273!\210\330 \210\333!\210\320 $(\203\313(!\203\314\313(!!\203r(q\210\n>\f?$@\312>!%\312\341%!!7)\202*\316=\204\317+!\210A\203*\342\n5\"\210\342\f6\"\210\343(7\".\207" [window-min-height buf-A wind-A buf-B wind-B buf-C ediff-skip-unsuitable-frames ok-unsplittable 1 ediff-get-visible-buffer-window window-frame get-buffer buffer-name frame-live-p ediff-quit error selected-window ediff-window-ok-for-display selected-frame nil ediff-overlayp overlay-start window-live-p select-window delete-other-windows t select-frame switch-to-buffer split-window-vertically window-height window-width 3 other-window minibuffer-window set-window-start ediff-setup-control-frame wind-C frame-A frame-B frame-C control-buf ediff-control-frame this-command ediff-KILLED-VITAL-BUFFER ctl-frame-exists-p ediff-wide-display-p force-one-frame ediff-split-window-function split-window-function ediff-3way-comparison-job three-way-comparison orig-wind use-same-frame wind-A-start wind-B-start designated-minibuffer-frame done-A done-B done-C ediff-narrow-bounds overl wind-width-or-height ediff-window-A ediff-window-B ediff-window-C ediff-windows-job] 4])
(defalias 'ediff-skip-unsuitable-frames #[(&optional ok-unsplittable) "\305 \205j \306\307 !\310\307 >\204[ \311	!\204I 	\305 \205+ \312\n!\205+ \313\n!\314=)\204I \315	!\316_W\204I \f\204[ 	\317\320\n!\236A)\203[ \307 B\321\322\323\"\210\306\307 !\202\f \307 >\203f \324\325!\326	!*\207" [seen-windows wind-frame frame window-min-height ok-unsplittable ediff-window-display-p window-frame selected-window nil ediff-frame-has-dedicated-windows frame-live-p frame-visible-p icon frame-height 3 unsplittable frame-parameters other-window 1 t make-frame ((unsplittable)) select-frame] 3])
(defalias 'ediff-frame-has-dedicated-windows #[(frame) "\302\303\304\305	#\210)\207" [ans frame nil walk-windows #[(wind) "\302!\205	 \303\211\207" [wind ans window-dedicated-p t] 2] ignore-minibuffer] 4])
(defalias 'ediff-window-ok-for-display #[(wind) "\301!\205 \302\303\304!#=\206 \305\304!!?\207" [wind window-live-p next-window ignore-minibuffer window-frame ediff-frame-has-dedicated-windows] 6])
(defalias 'ediff-setup-control-frame #[(ctl-buffer designated-minibuffer-frame) "\306\307\211\211\211\211\211\211\211\211@ABCD\203: \310D!\203: \311\310D!!\203: rDq\210\312\313!\210)\202F E\314=\204F \315F!\210D\203f \310D!\203f \311\310D!!\203f rDq\210G)\202q E\314=\206q \315F!D\203\247 \310D!\203\247 \311\310D!!\203\247 rDq\210\316\f!\203\226 \f\202\232 \317H!\211G\307\320\321\217\210)\202\263 E\314=\204\263 \315F!\210I\322 \205\310 \316I!\205\310 \323I!\324=)B\325!\210\326\327 !\204\336 \330 \210\331D!\210D\203\310D!\203\311\310D!!\203rDq\210\332\333!\210\332\334!\210\332\335!\210)\202E\314=\204\315F!\210\336D!\210JK\230?AE\337=\205*A@\340ed\"T\211\341 \342\\\343 ]\344\345L!B\346	B\347\nB\350\351BFM\203V\352\202W\353B\354 \210N\355>\203i\356\"\210\357!\210eb\210\356\"\210\360!\210\325!\210\361 \210O\203\226B\204\226A\204\226\362!\210\202\244@\204\240B\204\244\363!\210\364\327 \351\"\210\356PD	\n#\"\210\322 \203\333\365Q\366\367!\210\323!\204\332Q\370V\203\332QSQ\366\371!\210\202\301)I\322 \205\360\316I!\205\360\323I!\324=)\204\372E\314=\206R\351=?\"\210S\203:D\203.\310D!\203.\311\310D!!\203.rDq\210\373\374\375\307\376$\210)\202:E\314=\204:\315F!\210D\203[\310D!\203[\311\310D!!\203[rDq\210\312\377!)\202fE\314=\206f\315F!.\n\207" [adjusted-parameters fwidth fheight lines old-ctl-frame ctl-frame 1 nil get-buffer buffer-name run-hooks ediff-before-setup-control-frame-hook ediff-quit error frame-live-p make-frame (byte-code "\301\302\303\"\203 \304\302\303\305$\210\305\207" [ctl-frame face-attribute mode-line :box set-face-attribute nil] 5) ((error)) ediff-window-display-p frame-visible-p icon select-frame window-dedicated-p selected-window delete-other-windows switch-to-buffer make-local-variable frame-title-format frame-icon-title-format icon-title-format ediff-setup-control-buffer ediff-toggle-help count-lines ediff-help-message-line-length 2 ediff-compute-toolbar-width minibuffer minibuffer-window width height user-position t (auto-raise) (auto-raise . t) ediff-has-toolbar-support-p (emx windows-nt windows-95) modify-frame-parameters ediff-make-bottom-toolbar make-frame-visible ediff-refresh-control-frame iconify-frame raise-frame set-window-dedicated-p 7 sit-for 0.1 0 0.3 ediff-reset-mouse add-hook select-frame-hook ediff-xemacs-select-frame-hook local ediff-after-setup-control-frame-hook deiconify-ctl-frame dont-iconify-ctl-frame ctl-frame-iconified-p window-min-height ctl-buffer this-command ediff-KILLED-VITAL-BUFFER ediff-control-frame ediff-control-frame-parameters frame ediff-help-message ediff-brief-help-message designated-minibuffer-frame ediff-use-long-help-message system-type ediff-prefer-iconified-control-frame ediff-control-frame-position-function count ediff-grab-mouse ediff-xemacs-p] 11])
(defalias 'ediff-destroy-control-frame #[(ctl-buffer) "\203. \305!\203. \306\305!!\203. rq\210\307 \203* \310	!\203* 	\311\312\n!\210))\2028 \313=\2048 \314\f!\210\315 \207" [ctl-buffer ediff-control-frame ctl-frame this-command ediff-KILLED-VITAL-BUFFER get-buffer buffer-name ediff-window-display-p frame-live-p nil delete-frame ediff-quit error ediff-skip-unsuitable-frames] 3])
(defalias 'ediff-make-frame-position #[(ctl-buffer ctl-frame-width ctl-frame-height) "\203\325 \306!\203\325 \307\306!!\203\325 rq\210\310	!\311\n!\312\313\314\"A!\312\313\315\"A!\316\n!\317\211\317\211 \211\\\320\\ \321_\fZ!Z\"\203r #\322#!)$\\_\202\220 \n#\322#!)_#\322#!)%&\\\\_Z\\\323 '\211\\#\324#!)_Z^\325 %#\322#!)_Z^\326]\326]\314B\315.BD\207(\327=\206\340 \330)!\207" [ctl-buffer ediff-window-A frame-A frame-A-parameters frame-A-top frame-A-left get-buffer buffer-name window-frame frame-parameters eval assoc top left frame-width nil 0 -14 frame-char-width ediff-display-pixel-height frame-char-height ediff-display-pixel-width 1 ediff-quit error frame-A-width ediff-control-frame ctl-frame horizontal-adjustment upward-adjustment ctl-frame-top ctl-frame-left ediff-control-buffer-number ediff-control-frame-upward-shift ediff-use-long-help-message frame ediff-wide-control-frame-rightward-shift ctl-frame-width ediff-narrow-control-frame-leftward-shift ctl-frame-height this-command ediff-KILLED-VITAL-BUFFER] 6])
(defalias 'ediff-xemacs-select-frame-hook #[nil "\302 \232\205 	?\205 \303!\207" [ediff-control-frame ediff-use-long-help-message selected-frame raise-frame] 2])
#@326 Construct an alist of parameters for the wide display.
Saves the old frame parameters in `ediff-wide-display-orig-parameters'.
The frame to be resized is kept in `ediff-wide-display-frame'.
This function modifies only the left margin and the width of the display.
It assumes that it is called from within the control buffer.
(defalias 'ediff-make-wide-display #[nil "\306\307!\204\n \310\311!\210\312!\313	!	\314!)\307 \f\245\315Z\316\317\320\321\316\n\"A!]B\322\321\322\n\"ABD	\323	\316\fB\322B\324BB\",\207" [ediff-window-A frame-A frame-A-params frame cw wd fboundp ediff-display-pixel-width error "Can't determine display width" window-frame frame-parameters frame-char-width 5 left 0 eval assoc width modify-frame-parameters ((user-position t)) ediff-wide-display-orig-parameters ediff-wide-display-frame] 6 (#$ . 25328)])
(defalias 'ediff-refresh-mode-lines #[nil "\306\211\211\211\306\211\307Y\205 \f.W)\203	/\205C \310/!\205C \311\310/!!\205C \312012\31321\"A*JH\314H3\205O 3H\307H/\205y \310/!\205y \311\310/!!\205y \315012\31321\"A*JH\314H/\205\243 \310/!\205\243 \311\310/!!\205\243 \316012\31321\"A*JH\314H\203\257 \317\320\"\202\260 \321\n\203\274 \317\320\n\"\202\275 \321/\203\310/!\203\311\310/!!\203	\204\333 \203\317\322	\206\342 \321\203\354 \323P\202\355 \3213\203\377 3H\324H\203\377 \325\202 \321$\202\321\202\321\211\321\326 \203(4\203(56\232\203(\3277D\202-\3307\331E8\326 \203G4\203G56\232\203G\332\333!\202I\334 7\335 \210\326 \203]\3369!\203]\337 \210:\203\226\310:!\203\226\311\310:!!\203\226r:q\210#8@\340\235\203\210\341888\342\3438E8\335 \210)\202\242;\344=\204\242\345<!\210=\203\333\310=!\203\333\311\310=!!\203\333r=q\210\n#8@\340\235\203\315\341888\346\3438E8\335 \210)\202\347;\344=\204\347\345<!\210>\2031/\203%\310/!\203%\311\310/!!\203%r/q\210	#8@\340\235\203\341888\347\3438E8\335 \210)\2021;\344=\2041\345<!\210?\205\244\310?!\205\244\311\310?!!\205\244?\203\231\310?!\203\231\311\310?!!\203\231r?q\2108@\340\235\203n\341888\350;\204x\321\202\217\351\352\"\203\203\353\202\217\351\354\"\203\216\355\202\217\3218E\2118)\202\244;\344=\206\244\345<!,\207" [buf-C-state-merge buf-C-state-diff buf-B-state-diff buf-A-state-diff n ediff-current-difference nil 0 get-buffer buffer-name C assoc 3 A B format "[%s] " "" "[%s%s%s] " " " 1 " AncestorEmpty" ediff-window-display-p "   " "-- " "        Quick Help" ediff-make-narrow-control-buffer-id skip-name ediff-make-wide-control-buffer-id force-mode-line-update frame-live-p ediff-refresh-control-frame (" A: " " B: " " C: " " Ancestor: ") 2 " A: " ediff-diff-status ediff-quit error " B: " " C: " " Ancestor: " string-match "prefer-A" "[=diff(B)] " "prefer-B" "[=diff(A)] " ediff-number-of-differences ediff-buffer-C ediff-difference-vector-alist alist buf-type ediff-state-of-merge ediff-multiframe ediff-help-message ediff-brief-message-string mode-line-buffer-identification mode-line-format ediff-control-frame ediff-buffer-A this-command ediff-KILLED-VITAL-BUFFER ediff-buffer-B ediff-3way-job ediff-ancestor-buffer] 7])
(defalias 'ediff-refresh-control-frame #[nil "\203 \304	\305\306 B\307\310 BD\"\207\306 \310 \304	\311\"\207" [ediff-emacs-p ediff-control-frame frame-title-format frame-icon-title-format modify-frame-parameters title ediff-make-base-title icon-name ediff-make-narrow-control-buffer-id (nil)] 5])
(defalias 'ediff-make-narrow-control-buffer-id #[(&optional skip-name) "\203 \303\202\n \304 	\305W\203 \306\307\n\"\202* 	\nY\203$ \306\310\n\"\202* \306\311	T\n#P\207" [skip-name ediff-current-difference ediff-number-of-differences " " ediff-make-base-title 0 format " _/%d" " $/%d" " %d/%d"] 5])
(defalias 'ediff-make-base-title #[nil "\302\303\"A	P\207" [ediff-control-frame-parameters ediff-control-buffer-suffix assoc name] 3])
(defalias 'ediff-make-wide-control-buffer-id #[nil "\302W\203\f \303\304	\"C\207	Y\203 \303\305	\"C\207\303\306T	#C\207" [ediff-current-difference ediff-number-of-differences 0 format "%%b   At start of %d diffs" "%%b   At end of %d diffs" "%%b   diff %d of %d"] 4])
(defalias 'ediff-get-visible-buffer-window #[(buff) "\205 \302!\205 \303\302!!\205 	\203 \304\305\"\207\304\306\"\207" [buff ediff-xemacs-p get-buffer buffer-name get-buffer-window t visible] 3])
(defalias 'ediff-keep-window-config #[(control-buf) "p=\205\314 \306 \307U?\205\314 \203\301 \310!\203\301 \311\310!!\203\301 rq\210	\n\f\312!\205F \313 ?\206F \314\315!!)\205\277 \312!\205a \313 ?\206a \314\315!!)\205\277 \203\204 \312!\205\200 \313 ?\206\200 \314\315!!)\205\277 \316!=\205\277 \316!=\205\277 \203\246 \316!=\205\277 \317\320\313 \205\272 &\230-\207\321=\206\314 \322 !\207" [control-buf ediff-control-window ediff-window-A ediff-window-B ediff-window-C C-wind buffer-size 0 get-buffer buffer-name window-live-p ediff-window-display-p frame-visible-p window-frame window-buffer format "%S%S%S%S%S%S%S" ediff-quit error B-wind A-wind ctl-wind wind ediff-3way-job ediff-buffer-A ediff-buffer-B ediff-buffer-C ediff-window-config-saved ediff-split-window-function ediff-multiframe ediff-wide-display-p this-command ediff-KILLED-VITAL-BUFFER] 10])
(provide 'ediff-wind)