| Current Path : /usr/share/emacs/24.3/lisp/vc/ |
Linux gator3171.hostgator.com 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 |
| Current File : //usr/share/emacs/24.3/lisp/vc/ediff-wind.elc |
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:08:53 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/vc/ediff-wind.el
;;; in Emacs version 24.3.1
;;; with all optimizations.
;;; This file uses dynamic docstrings, first added in Emacs 19.29.
;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\204
\302\301\303\304B\"\210\305\306!\210\302\307\310\"\210\311\312\313\314\315\316\317\320\317\321& \207" [fboundp declare-function defalias macro #[(&rest r) "\300\207" [nil] 1] require ediff-init ediff-compute-toolbar-width #[nil "\300\207" [0] 1] custom-declare-group ediff-window nil "Ediff window manipulation." :prefix "ediff-" :group ediff frames] 10)
(defalias 'ediff-choose-window-setup-function-automatically #[nil "\300 \203 \301\207\302\207" [ediff-window-display-p ediff-setup-windows-multiframe ediff-setup-windows-plain] 1])
(byte-code "\300\301\302\303#\210\304\305\306\307\310\311\312\313\314\303& \207" [make-obsolete ediff-choose-window-setup-function-automatically ediff-setup-windows-default "24.3" custom-declare-variable ediff-window-setup-function 'ediff-setup-windows-default "Function called to set up windows.\nEdiff provides a choice of three functions:\n (1) `ediff-setup-windows-multiframe', which sets the control panel\n in a separate frame.\n (2) `ediff-setup-windows-plain', which does everything in one frame\n (3) `ediff-setup-windows-default' (the default), which does (1)\n on a graphical display and (2) on a text terminal.\n\nThe command \\[ediff-toggle-multiframe] can be used to toggle\nbetween the multiframe display and the single frame display. If\nthe multiframe function detects that one of the buffers A/B is\nseen in some other frame, it will try to keep that buffer in that\nframe.\n\nIf you don't like any of the two provided functions, write your own one.\nThe basic guidelines:\n 1. It should leave the control buffer current and the control window\n selected.\n 2. It should set `ediff-window-A', `ediff-window-B', `ediff-window-C',\n and `ediff-control-window' to contain window objects that display\n the corresponding buffers.\n 3. It should accept the following arguments:\n buffer-A, buffer-B, buffer-C, control-buffer\n Buffer C may not be used in jobs that compare only two buffers.\nIf you plan to do something fancy, take a close look at how the two\nprovided functions are written." :type (choice (const :tag "Choose Automatically" ediff-setup-windows-default) (const :tag "Multi Frame" ediff-setup-windows-multiframe) (const :tag "Single Frame" ediff-setup-windows-plain) (function :tag "Other function")) :group ediff-window :version] 10)
#@2
(defvar ediff-multiframe nil (#$ . 2932))
(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 (#$ . 3099))
(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 (#$ . 3283))
(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 (#$ . 3458))
(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 (#$ . 3621))
(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 (#$ . 3784))
(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 "" (#$ . 3947))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-window-config-saved put permanent-local t] 4)
(defconst ediff-window-alist '((A . ediff-window-A) (65 . ediff-window-A) (B . ediff-window-B) (66 . ediff-window-B) (C . ediff-window-C) (67 . ediff-window-C)))
(byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\313\306\307&\207" [custom-declare-variable ediff-split-window-function 'split-window-vertically "The function used to split the main window between buffer-A and buffer-B.\nYou can set it to a horizontal split instead of the default vertical split\nby setting this variable to `split-window-horizontally'.\nYou can also have your own function to do fancy splits.\nThis variable has no effect when buffer-A/B are shown in different frames.\nIn this case, Ediff will use those frames to display these buffers." :type (choice (const :tag "Split vertically" split-window-vertically) (const :tag "Split horizontally" split-window-horizontally) function) :group ediff-window ediff-merge-split-window-function 'split-window-horizontally "The function used to split the main window between buffer-A and buffer-B.\nYou can set it to a vertical split instead of the default horizontal split\nby setting this variable to `split-window-vertically'.\nYou can also have your own function to do fancy splits.\nThis variable has no effect when buffer-A/B/C are shown in different frames.\nIn this case, Ediff will use those frames to display these buffers." (choice (const :tag "Split vertically" split-window-vertically) (const :tag "Split horizontally" split-window-horizontally) function)] 8)
#@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) (#$ . 5645))
#@2
(defvar ediff-mouse-pixel-position nil (#$ . 6295))
(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 (#$ . 6483))
(byte-code "\300\301\302\303\304\305\306\307&\210\300\310\311\312\304\313\306\307&\210\300\314\315\316\304\317\306\307&\210\300\320\321\322\304\317\306\307&\210\300\323\324\325\304\317\306\307&\207" [custom-declare-variable ediff-grab-mouse t "If t, Ediff will always grab the mouse and put it in the control frame.\nIf 'maybe, Ediff will do it sometimes, but not after operations that require\nrelatively long time. If nil, the mouse will be entirely user's\nresponsibility." :type boolean :group ediff-window ediff-control-frame-position-function 'ediff-make-frame-position "Function to call to determine the desired location for the control panel.\nExpects three parameters: the control buffer, the desired width and height\nof the control frame. It returns an association list\nof the form ((top . <position>) (left . <position>))" function ediff-control-frame-upward-shift 42 "The upward shift of control frame from the top of buffer A's frame.\nMeasured in pixels.\nThis is used by the default control frame positioning function,\n`ediff-make-frame-position'. This variable is provided for easy\ncustomization of the default control frame positioning." integer ediff-narrow-control-frame-leftward-shift (if (featurep 'xemacs) 7 3) "The leftward shift of control frame from the right edge of buf A's frame.\nMeasured in characters.\nThis is used by the default control frame positioning function,\n`ediff-make-frame-position' to adjust the position of the control frame\nwhen it shows the short menu. This variable is provided for easy\ncustomization of the default." ediff-wide-control-frame-rightward-shift 7 "The rightward shift of control frame from the left edge of buf A's frame.\nMeasured in characters.\nThis is used by the default control frame positioning function,\n`ediff-make-frame-position' to adjust the position of the control frame\nwhen it shows the full menu. This variable is provided for easy\ncustomization of the default."] 8)
#@2
(defvar ediff-wide-display-p nil (#$ . 8601))
(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 (#$ . 8777))
(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 (#$ . 9064))
(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 (#$ . 9283))
(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 (#$ . 9874))
(byte-code "\300\301!\210\302\301\303\304#\210\305\306\307\310\311\312\313\314&\207" [make-variable-buffer-local ediff-control-frame put permanent-local t custom-declare-variable ediff-prefer-iconified-control-frame nil "If t, keep control panel iconified when help message is off.\nThis has effect only on a windowing system.\nIf t, hitting `?' to toggle control panel off iconifies it.\n\nThis is only useful in Emacs and only for certain kinds of window managers,\nsuch as TWM and its derivatives, since the window manager must permit\nkeyboard input to go into icons. XEmacs completely ignores keyboard input\ninto icons, regardless of the window manager." :type boolean :group ediff-window] 8)
(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\321!\211@)\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 " event-start] 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-default #[(buffer-A buffer-B buffer-C control-buffer) "\304 \203 \305\202\n \306 \n $\207" [buffer-A buffer-B buffer-C control-buffer display-graphic-p ediff-setup-windows-multiframe ediff-setup-windows-plain] 5])
(defalias 'ediff-setup-windows-plain #[(buffer-A buffer-B buffer-C control-buffer) "\203 \306!\203 \307\306!!\203 rq\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 rq\210 )\202A \313=\204A \314 !\210\315 \210\316\317 \310\"\210\320 \210\321 \210\322!\210\323\307!\210\324\325\326
_!]\327 !\210\317 \320\324\326 \fZ]!\210\317 =\203} \323\307!\210\317 \327 !\210\330 !\210 \210\317 =\203\230 \323\307!\210\327!!\210\317 \203\303 \311!\203\303 \312\311!!\203\303 rq\210 \"\n# $)\202\317 \313=\204\317 \314 !\210\321 \210\322!.\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 set-window-dedicated-p selected-window split-window-vertically ediff-select-lowest-window ediff-setup-control-buffer other-window 2 round window-height switch-to-buffer 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 rq\210'@ (\313(!\205@ \314(!)'A@ (\313(!\205S \314(!))%*#)\202m +\315=\204m \316,!\210\317 -\320\216\321\322\312\323 !\"*\203\205 \324\325\310\326\"!\210\327 \210\330\331 \310\"\210\332 \210\333 \210\334!\210\335\307!\210\336.!\210\331 #\203\275 %\332=\203\266 \337 !\202\271 \340 !\341\245$%$!\210\331 =\203\316 \335\307!\210\336/!\210\331 #\203\362 % \210\331 \n=\203\352 \335\307!\210\3360!\210\331 \203\311!\203\312\311!!\203rq\210 1\n2 3)\202!+\315=\204!\316,!\2104\2030\342
\"\210\342\n\f\"\210\333 \210\334!. \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 match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) string-match "*Minibuf-" window-buffer select-window next-window ignore-minibuf delete-other-windows set-window-dedicated-p selected-window split-window-vertically ediff-select-lowest-window ediff-setup-control-buffer other-window switch-to-buffer 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 save-match-data-internal 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 rq\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\2100)\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 \3274\324\f!\203`.\204`/\204`\325\f!\210\326 \210\317 \3275\324!!\203\202\322!!\203\202.\204\202\325!!\210\326 \210\317 !\3276/\203\263\324\n!\203\263\325\n!\210\326 \210\317 + \210\317 \n=\203\246\330\310!\210\331 !\210\317 \327\21145.\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\21145\3276)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\n7\f8!9\3127!\"\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\2101)\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\3354\204\335\327\n!\210\330 \210\320 \3318\326\f!\203\3654\204\365\327\f!\210\330 \210\320 \3319\326$!\2034\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\203U0\334=\203N\335\n!\202Q\336\n!\337\245=0=!\210\320 \n=\203f\340\310!\210\333 !\210\320 2\203\2130 \210\320 \n\fD>\203\203\340\310!\210\333
!\210\320 $\331\21189\331:)8\204\251\3273!\210\330 \210\333 !\210\320 9\204\275\3273!\210\330 \210\333 !\210\320 2\203\327:\204\327\3273!\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+!\210A\203*\342\n5\"\210\342\f6\"\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 < = > ?@\203: \310@!\203: \311\310@!!\203: r@q\210\312\313!\210)\202F A\314=\204F \315B!\210@\203f \310@!\203f \311\310@!!\203f r@q\210C)\202q A\314=\206q \315B!@\203\247 \310@!\203\247 \311\310@!!\203\247 r@q\210\316\f!\203\226 \f\202\232 \317D!\211C\307\320\321\217\210)\202\263 A\314=\204\263 \315B!\210
E\322 \205\310 \316E!\205\310 \323E!\324=)>\325
!\210\326\327 !\204\336 \330 \210\331@!\210@\203\310@!\203\311\310@!!\203r@q\210\332\333!\210\332\334!\210\332\335!\210)\202A\314=\204\315B!\210\336@!\210FG\230?=A\337=\205*=<\340ed\"T\211\341 \342\\\343 ]\344\345H!B\346 B\347\nB\350\351BFI\203V\352\202W\353B\354 \210J\355=\203i\356
\"\210\357
!\210eb\210\356
\"\210\360
!\210\325
!\210\361 \210K\203\226>\204\226=\204\226\362
!\210\202\244<\204\240>\204\244\363
!\210\364\327 \351\"\210\356
L@ \n#\"\210\322 \203\333\365 M\366\367!\210\323
!\204\332M\370V\203\332MSM\366\371!\210\202\301)
E\322 \205\360\316E!\205\360\323E!\324=)\204\372
A\314=\206N\351=?\"\210@\203%\310@!\203%\311\310@!!\203%r@q\210\312\373!)\2020A\314=\2060\315B!.\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 windows-nt 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 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] 11])
(defalias 'ediff-destroy-control-frame #[(ctl-buffer) "\203. \306!\203. \307\306!!\203. rq\210\310 \203* \311 !\203* \312\313\n!\210))\2028 \314=\2048 \315\f!\210
\205> \316 \207" [ctl-buffer ediff-control-frame ctl-frame this-command ediff-KILLED-VITAL-BUFFER ediff-multiframe 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\323 \306!\203\323 \307\306!!\203\323 rq\210\310 !\311\n!\312\313\314 \"A! \312\313\315 \"A! \316\n! \317\211 \317\211 ! \"#\320_ #\321_ \322\f $#!
%\203p &\323&!)' \\_\202\216 \n &\323&!)_ &\323&!)\324() #_Z\\\"!\325 \326* &\327&!)\320#Z^!\"\330 ( &\323&!)_Z^\"!\331]!\"\331]\"\314!B\315\". BD\207+\332=\206\336 \333,!\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 2 -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] 8])
(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 (#$ . 26286)])
(defalias 'ediff-refresh-mode-lines #[nil "\306\211\211\211\306
\211\307Y\205 \f.W)\203 /\205C \310/!\205C \311\310/!!\205C \3120 1 2\31321\"A*J
H\314H3\205O 3
H\307H/\205y \310/!\205y \311\310/!!\205y \3150 1 2\31321\"A*J
H\314H/\205\243 \310/!\205\243 \311\310/!!\205\243 \3160 1 2\31321\"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 \323P\202\355 \3213\203\377 3
H\324H\203\377 \325\202 \321$\202\321\202\321\211\321\326 \203(4\203(56\232\203(\3277D\202-\3307\331E8\326 \203G4\203G56\232\203G\332\333!\202I\334 7\335 \210\326 \203]\3369!\203]\337 \210:\203\234\310:!\203\234\311\310:!!\203\234r:q\210 #8:\203\2168@\340\235\203\216\341888\342\3438E8\335 \210)\202\250;\344=\204\250\345<!\210=\203\347\310=!\203\347\311\310=!!\203\347r=q\210\n#8:\203\3318@\340\235\203\331\341888\346\3438E8\335 \210)\202\363;\344=\204\363\345<!\210>\203C/\2037\310/!\2037\311\310/!!\2037r/q\210 #8:\203)8@\340\235\203)\341888\347\3438E8\335 \210)\202C;\344=\204C\345<!\210?\205\274\310?!\205\274\311\310?!!\205\274?\203\261\310?!\203\261\311\310?!!\203\261r?q\2108:\203\2068@\340\235\203\206\341888\350;\204\220\321\202\247\351\352\"\203\233\353\202\247\351\354\"\203\246\355\202\247\3218E\2118)\202\274;\344=\206\274\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 "\301\302\303 B\304\305 BD\"\207" [ediff-control-frame modify-frame-parameters title ediff-make-base-title icon-name ediff-make-narrow-control-buffer-id] 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\306T #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 \301!\205 \302\301!!\205 \303\304\"\207" [buff get-buffer buffer-name get-buffer-window 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 rq\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)