* riece-unread.el: Use riece-facep to check existence of

[riece] / lisp / riece-xemacs.el

diff --git a/lisp/riece-xemacs.el b/lisp/riece-xemacs.el
index 9cbd135..72ce435 100644 (file)
--- a/lisp/riece-xemacs.el
+++ b/lisp/riece-xemacs.el
@@ -122,6 +122,8 @@
     (set-extent-properties extent properties)
     (cons extent string)))
 
     (set-extent-properties extent properties)
     (cons extent string)))
 

+(defalias 'riece-facep 'find-face)
+

 (provide 'riece-xemacs)
 
 ;;; riece-xemacs.el ends here
 (provide 'riece-xemacs)
 
 ;;; riece-xemacs.el ends here