branch: externals/caml
commit 474e6eeb58afc10b28969022e9c621dfa83a7875
Author: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>
Commit: Jacques Garrigue <garrigue at math.nagoya-u.ac.jp>

    only set type faces where needed
    
    
    git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@6341 
f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
---
 caml-font.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/caml-font.el b/caml-font.el
index 678b2a5..628a757 100644
--- a/caml-font.el
+++ b/caml-font.el
@@ -2,8 +2,9 @@
 
 (cond
  ((x-display-color-p)
+  (require 'font-lock)
   (cond
-   ((not (memq 'font-lock-type-face (face-list)))
+   ((not (boundp 'font-lock-type-face))
     ; make the necessary faces
     (make-face 'Firebrick)
     (set-face-foreground 'Firebrick "Firebrick")

Reply via email to