Function: senator-isearch-mode-hook

senator-isearch-mode-hook is a byte-compiled function defined in senator.el.gz.

Signature

(senator-isearch-mode-hook)

Documentation

Isearch mode hook to setup semantic searching.

Source Code

;; Defined in /usr/src/emacs/lisp/cedet/semantic/senator.el.gz
(defun senator-isearch-mode-hook ()
  "Isearch mode hook to setup semantic searching."
  (if (and isearch-mode senator-isearch-semantic-mode)
      (progn
	;; When `senator-isearch-semantic-mode' is on save the
	;; previous `isearch-search-fun-function' and install the
	;; senator one.
	(when (and (local-variable-p 'isearch-search-fun-function)
		   (not (local-variable-p 'senator-old-isearch-search-fun)))
          (setq-local senator-old-isearch-search-fun
                      isearch-search-fun-function))
        (setq-local isearch-search-fun-function
                    #'senator-isearch-search-fun))
    ;; When `senator-isearch-semantic-mode' is off restore the
    ;; previous `isearch-search-fun-function'.
    (when (eq isearch-search-fun-function 'senator-isearch-search-fun)
      (if (local-variable-p 'senator-old-isearch-search-fun)
	  (progn
            (setq-local isearch-search-fun-function
                        senator-old-isearch-search-fun)
	    (kill-local-variable 'senator-old-isearch-search-fun))
	(kill-local-variable 'isearch-search-fun-function)))))