Merge pull request #3811 from Sbozzolo/develop
ui/nav-flash add vterm to +nav-flash-blink-cursor-maybe
This commit is contained in:
commit
fbd94d5475
1 changed files with 4 additions and 3 deletions
|
@ -14,11 +14,12 @@ jumping to another part of the file)."
|
||||||
|
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun +nav-flash-blink-cursor-maybe (&rest _)
|
(defun +nav-flash-blink-cursor-maybe (&rest _)
|
||||||
"Like `+nav-flash-blink-cursor', but no-ops if in special-mode or term-mode,
|
"Like `+nav-flash-blink-cursor', but no-ops if in special-mode, term-mode,
|
||||||
or triggered from one of `+nav-flash-exclude-commands'."
|
vterm-mode, or triggered from one of `+nav-flash-exclude-commands'."
|
||||||
(unless (or (memq this-command +nav-flash-exclude-commands)
|
(unless (or (memq this-command +nav-flash-exclude-commands)
|
||||||
(bound-and-true-p so-long-minor-mode)
|
(bound-and-true-p so-long-minor-mode)
|
||||||
(derived-mode-p 'so-long-mode 'special-mode 'term-mode)
|
(derived-mode-p 'so-long-mode 'special-mode 'term-mode
|
||||||
|
'vterm-mode)
|
||||||
(and (equal (point-marker) (car +nav-flash--last-point))
|
(and (equal (point-marker) (car +nav-flash--last-point))
|
||||||
(equal (selected-window) (cdr +nav-flash--last-point))))
|
(equal (selected-window) (cdr +nav-flash--last-point))))
|
||||||
(+nav-flash-blink-cursor)
|
(+nav-flash-blink-cursor)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue