Permalink
Browse files

Import of version 1.0.3

  • Loading branch information...
nschum committed May 1, 2008
1 parent 2ae5a7f commit 8da626f496b337e7a64bbce73d456dfc0597521e
Showing with 12 additions and 2 deletions.
  1. +12 −2 highlight-symbol.el
View
@@ -1,9 +1,9 @@
;;; highlight-symbol.el --- automatic and manual symbol highlighting
;;
-;; Copyright (C) 2007 Nikolaj Schumacher
+;; Copyright (C) 2007-2008 Nikolaj Schumacher
;;
;; Author: Nikolaj Schumacher <bugs * nschum de>
-;; Version: 1.0.2
+;; Version: 1.0.3
;; Keywords: faces, matching
;; URL: http://nschum.de/src/emacs/highlight-symbol/
;; Compatibility: GNU Emacs 22.x
@@ -42,6 +42,9 @@
;;
;;; Change Log:
;;
+;; 2008-02-26 (1.0.3)
+;; Added `highlight-symbol-remove-all'.
+;;
;; 2007-09-06 (1.0.2)
;; Fixed highlighting with delay set to 0. (thanks to Stefan Persson)
;;
@@ -169,6 +172,13 @@ element in of `highlight-symbol-faces'."
(hi-lock-set-pattern symbol color)))
(push symbol highlight-symbol-list)))))
+;;;###autoload
+(defun highlight-symbol-remove-all ()
+ "Remove symbol highlighting in buffer."
+ (interactive)
+ (mapc 'hi-lock-unface-buffer highlight-symbol-list)
+ (setq highlight-symbol-list nil))
+
;;;###autoload
(defun highlight-symbol-next ()
"Jump to the next location of the symbol at point within the function."

0 comments on commit 8da626f

Please sign in to comment.