@@ -46,7 +46,7 @@ the hunk consist only on added lines, then
4646(defvar diff-hl-show-hunk-inline--current-popup nil " The overlay of the current inline popup." )
4747(defvar diff-hl-show-hunk-inline--current-lines nil " A list of the lines to show in the popup." )
4848(defvar diff-hl-show-hunk-inline--current-index nil " First line showed in popup." )
49- (defvar diff-hl-show-hunk-inline--invokinkg -command nil " Command that invoked the popup." )
49+ (defvar diff-hl-show-hunk-inline--invoking -command nil " Command that invoked the popup." )
5050(defvar diff-hl-show-hunk-inline--current-footer nil " String to be displayed in the footer." )
5151(defvar diff-hl-show-hunk-inline--current-header nil " String to be displayed in the header." )
5252(defvar diff-hl-show-hunk-inline--height nil " Height of the popup." )
@@ -58,7 +58,7 @@ the hunk consist only on added lines, then
5858(make-variable-buffer-local 'diff-hl-show-hunk-inline--current-index )
5959(make-variable-buffer-local 'diff-hl-show-hunk-inline--current-header )
6060(make-variable-buffer-local 'diff-hl-show-hunk-inline--current-footer )
61- (make-variable-buffer-local 'diff-hl-show-hunk-inline--invokinkg -command )
61+ (make-variable-buffer-local 'diff-hl-show-hunk-inline--invoking -command )
6262(make-variable-buffer-local 'diff-hl-show-hunk-inline--current-custom-keymap )
6363(make-variable-buffer-local 'diff-hl-show-hunk-inline--height )
6464(make-variable-buffer-local 'diff-hl-show-hunk-inline--close-hook )
@@ -222,7 +222,7 @@ to scroll in the popup")
222222 ; ; https://emacs.stackexchange.com/questions/653/how-can-i-find-out-in-which-keymap-a-key-is-bound
223223 (let ((keys (where-is-internal command (list diff-hl-show-hunk-inline--current-custom-keymap
224224 diff-hl-show-hunk-inline-transient-mode-map ) t ))
225- (invoking (eq command diff-hl-show-hunk-inline--invokinkg -command)))
225+ (invoking (eq command diff-hl-show-hunk-inline--invoking -command)))
226226 (or keys invoking)))
227227
228228(defun diff-hl-show-hunk-inline--post-command-hook ()
@@ -280,7 +280,7 @@ is closed."
280280 (mapcar (lambda (s ) (replace-regexp-in-string " \n " " " s)) lines))
281281 (setq diff-hl-show-hunk-inline--current-header header)
282282 (setq diff-hl-show-hunk-inline--current-footer footer)
283- (setq diff-hl-show-hunk-inline--invokinkg -command this-command)
283+ (setq diff-hl-show-hunk-inline--invoking -command this-command)
284284 (setq diff-hl-show-hunk-inline--current-custom-keymap keymap)
285285 (setq diff-hl-show-hunk-inline--close-hook close-hook)
286286 (setq diff-hl-show-hunk-inline--height (diff-hl-show-hunk-inline--compute-content-height height))
0 commit comments