 ;;;; (when (fboundp :require-patch) (:require-patch ""))
 ;;;; HISTORY :
 ;;;; $Log$
+;;;; Revision 3.2  2011/07/22 13:56:47  folli
+;;;; Xemacs compat
+;;;;
 ;;;; Revision 3.1  2011/07/22 13:43:21  folli
 ;;;; Colorize background to know if a function has been redefined
 ;;;; or not

		   (setq o (make-overlay start end))
		   (push o plw-source-color-overlays)))
	    
	    (overlay-put o 'face `(:background ,(if status plw-source-color-ok plw-source-color-not-ok)))
	    (overlay-put o 'plw-colorize-source id)))))))
      
;;(define-minor-mode plw-source-color-mode
