procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Autoload cursor-sensor-inhibit (bug#23406)

Browse source 
* lisp/emacs-lisp/cursor-sensor.el (cursor-sensor-inhibit): Autoload.
* lisp/isearch.el (isearch-update): Remove boundp check.
This commit is contained in:
Leo Liu 2016-04-30 23:35:27 +08:00
parent b52ebd4f20
commit b755d988b4
2 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
lisp/emacs-lisp/cursor-sensor.el
View file

@ -31,6 +31,7 @@
;;; Code: ;;; Code:
;;;###autoload
(defvar cursor-sensor-inhibit nil) (defvar cursor-sensor-inhibit nil)
(defun cursor-sensor--intangible-p (pos) (defun cursor-sensor--intangible-p (pos)

4
lisp/isearch.el
View file

@ -840,7 +840,6 @@ See the command `isearch-forward-symbol' for more information."
(isearch-update))))) (isearch-update)))))
(defvar cursor-sensor-inhibit)
;; isearch-mode only sets up incremental search for the minor mode. ;; isearch-mode only sets up incremental search for the minor mode.
;; All the work is done by the isearch-mode commands. ;; All the work is done by the isearch-mode commands.
@ -973,8 +972,7 @@ The last thing is to trigger a new round of lazy highlighting."
(setq cursor-sensor-inhibit (delq 'isearch cursor-sensor-inhibit)))) (setq cursor-sensor-inhibit (delq 'isearch cursor-sensor-inhibit))))
(setq isearch--current-buffer (current-buffer)) (setq isearch--current-buffer (current-buffer))
(make-local-variable 'cursor-sensor-inhibit) (make-local-variable 'cursor-sensor-inhibit)
(unless (boundp 'cursor-sensor-inhibit) (setq cursor-sensor-inhibit nil)
(setq cursor-sensor-inhibit nil))
;; Suspend things like cursor-intangible during Isearch so we can search ;; Suspend things like cursor-intangible during Isearch so we can search
;; even within intangible text. ;; even within intangible text.
(push 'isearch cursor-sensor-inhibit)) (push 'isearch cursor-sensor-inhibit))