* cvs-status.el (cvs-refontify): Remove unused.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d47d9bae82abe0a6712028b78d76b329f70ffd04..88c2627d5610c32220b93990917f6f8cd595380c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-04-18  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * cvs-status.el (cvs-refontify): Remove unused.
+
 2010-04-18  Jay Belanger  <jay.p.belanger@gmail.com>
 
        * calc.el (calc-mode-map): Bind "O" to `calc-missing-key'.

diff --git a/lisp/cvs-status.el b/lisp/cvs-status.el
index 1cc9ca9d7135f7c6c2ef050b6c844ec242a611bb..e5a30684eb0f134a47fe0bb31008c49381833031 100644 (file)
--- a/lisp/cvs-status.el
+++ b/lisp/cvs-status.el
@@ -356,11 +356,11 @@ the list is a three-string list TAG, KIND, REV."
       tags)))
 
 (defvar font-lock-mode)
-(defun cvs-refontify (beg end)
-  (when (and (boundp 'font-lock-mode)
-            font-lock-mode
-            (fboundp 'font-lock-fontify-region))
-    (font-lock-fontify-region (1- beg) (1+ end))))
+;; (defun cvs-refontify (beg end)
+;;   (when (and (boundp 'font-lock-mode)
+;;          font-lock-mode
+;;          (fboundp 'font-lock-fontify-region))
+;;     (font-lock-fontify-region (1- beg) (1+ end))))
 
 (defun cvs-status-trees ()
   "Look for a lists of tags, and replace them with trees."