Current File : //usr/local/share/emacs/27.2/lisp/vc/ediff-help.elc
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; with all optimizations.
;;; This file contains utf-8 non-ASCII characters,
;;; and so cannot be loaded into Emacs 22 or earlier.
(and (boundp 'emacs-version)
(< (aref emacs-version (1- (length emacs-version))) ?A)
(string-lessp emacs-version "23")
(error "`%s' was compiled for Emacs 23 or later" #$))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'ediff-init)
#@36 The head of the full help message.
(defconst ediff-long-help-message-head " Move around | Toggle features | Manipulate\n=====================|===========================|=============================" (#$ . 430))
#@36 The tail of the full-help message.
(defconst ediff-long-help-message-tail "=====================|===========================|=============================\n R -show registry | = -compare regions | M -show session group\n D -diff output | E -browse Ediff manual| G -send bug report\n i -status info | ? -help off | z/q -suspend/quit\n-------------------------------------------------------------------------------\nFor help on a specific command: Click Button 2 over it; or\n Put the cursor over it and type RET." (#$ . 674))
#@117 Help message usually used for 3-way comparison.
Normally, not a user option. See `ediff-help-message' for details.
(defconst ediff-long-help-message-compare3 "\np,DEL -previous diff | | -vert/horiz split | xy -copy buf X's region to Y\nn,SPC -next diff | h -highlighting | rx -restore buf X's old diff\n j -jump to diff | @ -auto-refinement | * -refine current region\n gx -goto X's point| ## -ignore whitespace | ! -update diff regions\n C-l -recenter | #c -ignore case |\n v/V -scroll up/dn | #f/#h -focus/hide regions | wx -save buf X\n </> -scroll lt/rt | X -read-only in buf X | wd -save diff output\n ~ -rotate buffers| m -wide display |\n" (#$ . 1269))
#@117 Help message usually used for 2-way comparison.
Normally, not a user option. See `ediff-help-message' for details.
(defconst ediff-long-help-message-compare2 "\np,DEL -previous diff | | -vert/horiz split |a/b -copy A/B's region to B/A\nn,SPC -next diff | h -highlighting | rx -restore buf X's old diff\n j -jump to diff | @ -auto-refinement | * -refine current region\n gx -goto X's point| ## -ignore whitespace | ! -update diff regions\n C-l -recenter | #c -ignore case |\n v/V -scroll up/dn | #f/#h -focus/hide regions | wx -save buf X\n </> -scroll lt/rt | X -read-only in buf X | wd -save diff output\n ~ -swap variants | m -wide display |\n" (#$ . 2013))
#@130 Help message when comparing windows or regions line-by-line.
Normally, not a user option. See `ediff-help-message' for details.
(defconst ediff-long-help-message-narrow2 "\np,DEL -previous diff | | -vert/horiz split |a/b -copy A/B's region to B/A\nn,SPC -next diff | h -highlighting | rx -restore buf X's old diff\n j -jump to diff | @ -auto-refinement | * -refine current region\n gx -goto X's point| ## -ignore whitespace | ! -update diff regions\n C-l -recenter | #c -ignore case | % -narrow/widen buffs\n v/V -scroll up/dn | #f/#h -focus/hide regions | wx -save buf X\n </> -scroll lt/rt | X -read-only in buf X | wd -save diff output\n ~ -swap variants | m -wide display |\n" (#$ . 2757))
#@130 Help message when comparing windows or regions word-by-word.
Normally, not a user option. See `ediff-help-message' for details.
(defconst ediff-long-help-message-word-mode "\np,DEL -previous diff | | -vert/horiz split | xy -copy buf X's region to Y\nn,SPC -next diff | h -highlighting | rx -restore buf X's old diff\n j -jump to diff | |\n gx -goto X's point| % -narrow/widen buffs | ! -recompute diffs\n C-l -recenter | #c -ignore case |\n v/V -scroll up/dn | #f/#h -focus/hide regions | wx -save buf X\n </> -scroll lt/rt | X -read-only in buf X | wd -save diff output\n ~ -swap variants | m -wide display |\n" (#$ . 3536))
#@102 Help message for merge sessions.
Normally, not a user option. See `ediff-help-message' for details.
(defconst ediff-long-help-message-merge "\np,DEL -previous diff | | -vert/horiz split | x -copy buf X's region to C\nn,SPC -next diff | h -highlighting | r -restore buf C's old diff\n j -jump to diff | @ -auto-refinement | * -refine current region\n gx -goto X's point| ## -ignore whitespace | ! -update diff regions\n C-l -recenter | #f/#h -focus/hide regions | + -combine diff regions\n v/V -scroll up/dn | X -read-only in buf X | wx -save buf X\n </> -scroll lt/rt | m -wide display | wd -save diff output\n ~ -swap variants | s -shrink window C | / -show/hide ancestor buff\n | $$ -show clashes only | & -merge w/new default\n | $* -skip changed regions |\n" (#$ . 4264))
#@69 Normally, not a user option. See `ediff-help-message' for details.
(defvar ediff-long-help-message "" (#$ . 5170))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-long-help-message put permanent-local t] 4)
#@37 Contents of the brief help message.
(defconst ediff-brief-message-string " Type ? for help" (#$ . 5418))
#@69 Normally, not a user option. See `ediff-help-message' for details.
(defvar ediff-brief-help-message "" (#$ . 5529))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-brief-help-message put permanent-local t] 4)
#@195 The brief help message that the user can customize.
If the user sets this to a parameter-less function, Ediff will use it to
produce the brief help message. This function must return a string.
(defvar ediff-brief-help-message-function nil (#$ . 5780))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-brief-help-message-function put permanent-local t] 4)
#@102 The long help message that the user can customize.
See `ediff-brief-help-message-function' for more.
(defvar ediff-long-help-message-function nil (#$ . 6176))
(byte-code "\300\301!\210\302\301\303\304#\210\305\306\307\310\311DD\312\313\314\315\316&\207" [make-variable-buffer-local ediff-long-help-message-function put permanent-local t custom-declare-variable ediff-use-long-help-message funcall function #[0 "\300\207" [nil] 1] "If t, Ediff displays a long help message. Short help message otherwise." :type boolean :group ediff-window] 8)
#@264 The actual help message.
Normally, the user shouldn't touch this. However, if you want Ediff to
start up with different help messages for different jobs, you can change
the value of this variable and the variables `ediff-help-message-*' in
`ediff-startup-hook'.
(defvar ediff-help-message "" (#$ . 6727))
(byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-help-message put permanent-local t] 4)
(defvar ediff-help-region-map (make-sparse-keymap))
(define-key ediff-help-region-map [mouse-2] 'ediff-help-for-quick-help)
(defalias 'ediff-set-help-overlays #[0 "eb\210\300\211\211\211\301\302\300\303#\2053 \304\224\262\305\225\262\304\224\304\225{\262\306\"\262\307\310\311#\210\307\312#\210\202 \207" [nil re-search-forward " *\\([^ \n|]+\\||\\) +-[^|\n]+" noerror 1 0 make-overlay ediff-overlay-put mouse-face highlight ediff-help-info] 8])
#@40 Explain Ediff commands in more detail.
(defalias 'ediff-help-for-quick-help #[0 "\303\304!\204\f \305\306\"\210\210\307 !\303\310\311\312!\"@\262\211;\204# \305\313!\210\314\315!\210\303\211\316\230\2035 \317\320!\202Z\211\321\230\203A \317\322!\202Z\211\323\230\203M \317\324!\202Z\211\325\230\203Y \317\326!\202Z\211\327\230\203e \317\330!\202Z\211\331\230\203q \317\332!\202Z\211\333\230\203} \317\332!\202Z\211\334\230\203\211 \317\335!\202Z\211\336\230\203\225 \317\337!\202Z\211\340\230\203\241 \317\341!\202Z\211\342\230\203\255 \317\343!\202Z\211\344\230\203\271 \317\345!\202Z\211\346\230\203\305 \317\347!\202Z\211\350\230\203\321 \317\351!\202Z\211\352\230\203\335 \317\353!\202Z\211\354\230\203\351 \317\355!\202Z\211\356\230\203\365 \317\357!\202Z\211\360\230\203\317\361!\202Z\211\362\230\203
\317\363!\202Z\211\364\230\203\317\365!\202Z\211\366\230\203%\317\367!\202Z\211\370\230\2031\317\371!\202Z\211\372\230\203=\317\373!\202Z\211\374\230\203I\317\375!\202Z\211\376\230\203U\317\377!\202Z\211\201@ \230\203e\317\201A !\202Z\211\201B \230\203u\317\201C !\202Z\211\201D \230\203\205\317\201E !\202Z\211\201F \230\203\225\317\201G !\202Z\211\201H \230\203\245\317\201I !\202Z\211\201J \230\203\265\317\201K !\202Z\211\201L \230\203\305\317\201M !\202Z\211\201N \230\203\325\317\201O !\202Z\211\201P \230\203\345\317\201Q !\202Z\211\201R \230\203\365\317\201S !\202Z\211\201T \230\203\317\201U !\202Z\211\201V \230\203\317\201W !\202Z\211\201X \230\203%\317\201Y !\202Z\211\201Z \230\2035\317\201[ !\202Z\211\201\\ \230\203E\317\201] !\202Z\211\201^ \230\203U\317\201_ !\202Z\305\201` !)\207" [this-command last-command-event case-fold-search nil ediff-in-control-buffer-p user-error "%S: This command runs in Ediff Control Buffer only!" ediff-event-point mapcar #[257 "\300\301\"\207" [overlay-get ediff-help-info] 4 "\n\n(fn ELT)"] overlays-at "Hmm... I don't see an Ediff command around here..." ediff-documentation "Quick Help Commands" "?" re-search-forward "^['`‘]\\?['’]" "G" "^['`‘]G['’]" "E" "^['`‘]E['’]" "wd" "^['`‘]wd['’]" "wx" "^['`‘]wa['’]" "a/b" "^['`‘]a['’]" "x" "xy" "^['`‘]ab['’]" "p,DEL" "^['`‘]p['’]" "n,SPC" "^['`‘]n['’]" "j" "^['`‘]j['’]" "gx" "^['`‘]ga['’]" "!" "^['`‘]!['’]" "*" "^['`‘]\\*['’]" "m" "^['`‘]m['’]" "|" "^['`‘]|['’]" "@" "^['`‘]@['’]" "h" "^['`‘]h['’]" "r" "^['`‘]r['’]" "rx" "^['`‘]ra['’]" "##" "^['`‘]##['’]" "#c" "^['`‘]#c['’]" "#f/#h" "^['`‘]#f['’]" "X" "^['`‘]A['’]" "v/V" "^['`‘]v['’]" "</>" "^['`‘]<['’]" "~" "^['`‘]~['’]" "i" "^['`‘]i['’]" "D" "^['`‘]D['’]" "R" "^['`‘]R['’]" "M" "^['`‘]M['’]" "z/q" "^['`‘]z['’]" "%" "^['`‘]%['’]" "C-l" "^['`‘]C-l['’]" "$$" "^['`‘]\\$\\$['’]" "$*" "^['`‘]\\$\\*['’]" "/" "^['`‘]/['’]" "&" "^['`‘]&['’]" "s" "^['`‘]s['’]" "+" "^['`‘]\\+['’]" "=" "^['`‘]=['’]" "Undocumented command! Type `G' in Ediff Control Panel to drop a note to the Ediff maintainer"] 6 (#$ . 7617) nil])
(defalias 'ediff-help-message-line-length #[0 "\212eb\210\203 \301y\210\302\210i)\207" [ediff-use-long-help-message 1 nil] 1])
(defalias 'ediff-indent-help-message #[0 "\300\301 \302 Z]\303\245\304\305\"\212eb\210`dW\205# \211c\210\306 \210\307y\210\202 )\207" [0 window-width ediff-help-message-line-length 2 make-string 32 beginning-of-line 1] 4])
(defalias 'ediff-set-help-message #[0 "\203 \306!\203 \202E \203 \n \fQ\202E
\203& \n\n\fQ\202E \2033 \n\f\fQ\202E
\203@ \n\fQ\202E \n\fQ\203Y \306!\203Y \202u ;\203d \202u \307 \203s \203s \202u \203\201 \202\203 \310\311!\207" [ediff-long-help-message-function ediff-word-mode ediff-long-help-message-head ediff-long-help-message-word-mode ediff-long-help-message-tail ediff-narrow-job functionp ediff-window-display-p run-hooks ediff-display-help-hook ediff-long-help-message-narrow2 ediff-merge-job ediff-long-help-message-merge ediff-diff3-job ediff-long-help-message-compare3 ediff-long-help-message-compare2 ediff-long-help-message ediff-brief-help-message-function ediff-multiframe ediff-brief-message-string ediff-brief-help-message ediff-use-long-help-message ediff-help-message] 3])
(defalias 'ediff-customize #[0 "\300\301!\207" [customize-group "ediff"] 2 nil nil])
(provide 'ediff-help)
Mini Shell