;ELC
|
;;; Compiled
|
;;; in Emacs version 26.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.
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
(require 'diff-hl)
|
#@105 Non-nil if Diff-Hl-Amend mode is enabled.
|
Use the command `diff-hl-amend-mode' to change this variable.
|
(defvar diff-hl-amend-mode nil (#$ . 428))
|
(make-variable-buffer-local 'diff-hl-amend-mode)
|
#@235 Show changes against the second-last revision in `diff-hl-mode'.
|
Most useful with backends that support rewriting local commits,
|
and most importantly, 'amending' the most recent one.
|
Currently only supports Git, Mercurial and Bazaar.
|
(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))])
|
(defvar diff-hl-amend-mode-hook nil)
|
(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)
|
(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])
|
(defvar diff-hl-amend-mode-major-mode nil)
|
(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)
|
#@363 Toggle Diff-Hl-Amend mode in all buffers.
|
With prefix ARG, enable Global Diff-Hl-Amend mode if ARG is positive;
|
otherwise, disable it. If called from Lisp, enable the mode if
|
ARG is omitted or nil.
|
|
Diff-Hl-Amend mode is enabled in all buffers where
|
`turn-on-diff-hl-amend-mode' would do it.
|
See `diff-hl-amend-mode' for more information on Diff-Hl-Amend mode.
|
(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))])
|
(defvar global-diff-hl-amend-mode-hook nil)
|
(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)
|
(defvar diff-hl-amend-mode-set-explicitly nil nil)
|
(make-variable-buffer-local 'diff-hl-amend-mode-set-explicitly)
|
(defalias 'diff-hl-amend-mode-set-explicitly #[nil "\301\211\207" [diff-hl-amend-mode-set-explicitly t] 2])
|
(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)
|
(defvar global-diff-hl-amend-mode-buffers nil)
|
(defalias 'global-diff-hl-amend-mode-enable-in-buffers #[nil "\306\211\205< \n@\307 !\2034 r 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])
|
(put 'global-diff-hl-amend-mode-enable-in-buffers 'definition-name 'global-diff-hl-amend-mode)
|
(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])
|
(put 'global-diff-hl-amend-mode-check-buffers 'definition-name 'global-diff-hl-amend-mode)
|
(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])
|
(put 'global-diff-hl-amend-mode-cmhh 'definition-name 'global-diff-hl-amend-mode)
|
#@58 Turn on `diff-hl-amend-mode' in a buffer if appropriate.
|
(defalias 'turn-on-diff-hl-amend-mode #[nil "\205 \301\302!\207" [buffer-file-name diff-hl-amend-mode 1] 2 (#$ . 6791)])
|
(provide 'diff-hl-amend)
|
