mirror of https://github.com/Chizi123/.emacs.d.git

Chizi123
2018-11-18 8f6f2705a38e2515b6c57fda12c5be29fb9a798f
commit | author | age
5cb5f7 1 ;ELC
C 2 ;;; Compiled
3 ;;; in Emacs version 26.1
4 ;;; with all optimizations.
5
6 ;;; This file uses dynamic docstrings, first added in Emacs 19.29.
7
8 ;;; This file does not contain utf-8 non-ASCII characters,
9 ;;; and so can be loaded in Emacs versions earlier than 23.
10
11 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
12 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
13
14
15 (require 'diff-hl)
16 #@105 Non-nil if Diff-Hl-Amend mode is enabled.
17 Use the command `diff-hl-amend-mode' to change this variable.
18 (defvar diff-hl-amend-mode nil (#$ . 428))
19 (make-variable-buffer-local 'diff-hl-amend-mode)
20 #@235 Show changes against the second-last revision in `diff-hl-mode'.
21 Most useful with backends that support rewriting local commits,
22 and most importantly, 'amending' the most recent one.
23 Currently only supports Git, Mercurial and Bazaar.
24 (defalias 'diff-hl-amend-mode #[(&optional arg) "\306     \307=\203\n?\202\310    !\311V\211\203%\312 \210\313\314\312\315\316$\210\2021\317\314\312\316#\210\320\303!\210\315\f\2038\321 \210\322\323\n\203B\324\202C\325\"\210\326\327!\203h\306 \203W\306 \232\203h\330\331\332\n\203c\333\202d\334 #\210))\335 \210\n\207" [#1=#:last-message arg diff-hl-amend-mode diff-hl-reference-revision diff-hl-mode local current-message toggle prefix-numeric-value 0 diff-hl-amend-setup add-hook after-revert-hook nil t remove-hook make-local-variable diff-hl-update run-hooks diff-hl-amend-mode-hook diff-hl-amend-mode-on-hook diff-hl-amend-mode-off-hook called-interactively-p any " in current buffer" message "Diff-Hl-Amend mode %sabled%s" "en" "dis" force-mode-line-update] 6 (#$ . 631) (list (or current-prefix-arg 'toggle))])
25 (defvar diff-hl-amend-mode-hook nil)
26 (byte-code "\301\302N\204\f\303\301\302\304#\210\305\306\307\310\300!\205\311\211%\207" [diff-hl-amend-mode-map diff-hl-amend-mode-hook variable-documentation put "Hook run after entering or leaving `diff-hl-amend-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" add-minor-mode diff-hl-amend-mode " Amend" boundp nil] 6)
27 (defalias 'diff-hl-amend-setup #[nil "\303!\211\205!\304\302!\210    \305\267\202\306\202\307\202\310\202\311\211)\207" [buffer-file-name backend diff-hl-reference-revision vc-backend make-local-variable #s(hash-table size 3 test eql rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (Git 18 Hg 22 Bzr 26)) "HEAD^" "-2" "revno:-2" nil] 3])
28 (defvar diff-hl-amend-mode-major-mode nil)
29 (byte-code "\300\301!\210\302\303\304\305\306\307\310\311\312\313\314\315& \207" [make-variable-buffer-local diff-hl-amend-mode-major-mode custom-declare-variable global-diff-hl-amend-mode nil "Non-nil if Global Diff-Hl-Amend mode is enabled.\nSee the `global-diff-hl-amend-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `global-diff-hl-amend-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :group diff-hl-amend :type boolean] 12)
30 #@363 Toggle Diff-Hl-Amend mode in all buffers.
31 With prefix ARG, enable Global Diff-Hl-Amend mode if ARG is positive;
32 otherwise, disable it.  If called from Lisp, enable the mode if
33 ARG is omitted or nil.
34
35 Diff-Hl-Amend mode is enabled in all buffers where
36 `turn-on-diff-hl-amend-mode' would do it.
37 See `diff-hl-amend-mode' for more information on Diff-Hl-Amend mode.
38 (defalias 'global-diff-hl-amend-mode #[(&optional arg) "\306 \307\302    \310=\203\311\302!?\202\312    !\313V\"\210\n\203/\314\315\316\"\210\314\317\320\"\210\314\321\322\"\210\202>\323\315\316\"\210\323\317\320\"\210\323\321\322\"\210\324 \325\211\203h\f@r q\210\n\203X\326 \210\202` \203`\305\327!\210)\fA\211\204G*\330\331\311\302!\203u\332\202v\333\"\210\334\335!\203\243\336\302!\210\306 \203\216\306 \232\203\243\337%\340\341\311\302!\203\235\342\202\236\343%#\210))\344 \210\311\302!\207" [#1=#:last-message arg global-diff-hl-amend-mode buf --dolist-tail-- diff-hl-amend-mode current-message set-default toggle default-value prefix-numeric-value 0 add-hook after-change-major-mode-hook global-diff-hl-amend-mode-enable-in-buffers find-file-hook global-diff-hl-amend-mode-check-buffers change-major-mode-hook global-diff-hl-amend-mode-cmhh remove-hook buffer-list nil turn-on-diff-hl-amend-mode -1 run-hooks global-diff-hl-amend-mode-hook global-diff-hl-amend-mode-on-hook global-diff-hl-amend-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Global Diff-Hl-Amend mode %sabled%s" "en" "dis" force-mode-line-update local] 5 (#$ . 3149) (list (or current-prefix-arg 'toggle))])
39 (defvar global-diff-hl-amend-mode-hook nil)
40 (byte-code "\301\302N\204\f\303\301\302\304#\210\305\306\307\310\300!\205\307\211%\207" [global-diff-hl-amend-mode-map global-diff-hl-amend-mode-hook variable-documentation put "Hook run after entering or leaving `global-diff-hl-amend-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it.  (This is true for all hook variables.)" add-minor-mode global-diff-hl-amend-mode nil boundp] 6)
41 (defvar diff-hl-amend-mode-set-explicitly nil nil)
42 (make-variable-buffer-local 'diff-hl-amend-mode-set-explicitly)
43 (defalias 'diff-hl-amend-mode-set-explicitly #[nil "\301\211\207" [diff-hl-amend-mode-set-explicitly t] 2])
44 (byte-code "\300\301\302\303#\210\304\305\301\"\207" [put diff-hl-amend-mode-set-explicitly definition-name global-diff-hl-amend-mode add-hook diff-hl-amend-mode-hook] 4)
45 (defvar global-diff-hl-amend-mode-buffers nil)
46 (defalias 'global-diff-hl-amend-mode-enable-in-buffers #[nil "\306\211\205<\n@\307    !\2034r    q\210 \2041\f =\2041\203.\310\311!\210\312 \210\2021\312 \210 )\nA\211\204\306*\207" [global-diff-hl-amend-mode-buffers buf --dolist-tail-- diff-hl-amend-mode-set-explicitly diff-hl-amend-mode-major-mode major-mode nil buffer-live-p diff-hl-amend-mode -1 turn-on-diff-hl-amend-mode] 3])
47 (put 'global-diff-hl-amend-mode-enable-in-buffers 'definition-name 'global-diff-hl-amend-mode)
48 (defalias 'global-diff-hl-amend-mode-check-buffers #[nil "\301 \210\302\303\304\305\"\207" [global-diff-hl-amend-mode-buffers global-diff-hl-amend-mode-enable-in-buffers nil remove-hook post-command-hook global-diff-hl-amend-mode-check-buffers] 3])
49 (put 'global-diff-hl-amend-mode-check-buffers 'definition-name 'global-diff-hl-amend-mode)
50 (defalias 'global-diff-hl-amend-mode-cmhh #[nil "p\211    \235\203     \210\202    B)\302\303\304\"\207" [#1=#:x global-diff-hl-amend-mode-buffers add-hook post-command-hook global-diff-hl-amend-mode-check-buffers] 4])
51 (put 'global-diff-hl-amend-mode-cmhh 'definition-name 'global-diff-hl-amend-mode)
52 #@58 Turn on `diff-hl-amend-mode' in a buffer if appropriate.
53 (defalias 'turn-on-diff-hl-amend-mode #[nil "\205\301\302!\207" [buffer-file-name diff-hl-amend-mode 1] 2 (#$ . 6791)])
54 (provide 'diff-hl-amend)