From d40cb1df98db97f6290eb6cc190fe0cf11a49a3c Mon Sep 17 00:00:00 2001 From: morioka Date: Thu, 22 May 1997 03:24:36 +0000 Subject: [PATCH] (emh-make-face-bold, emh-make-face-italic): New implementation. --- emh-face.el | 14 +++++--------- 1 file changed, 5 insertions(+), 9 deletions(-) diff --git a/emh-face.el b/emh-face.el index ec9db7f..3d6f42a 100644 --- a/emh-face.el +++ b/emh-face.el @@ -4,7 +4,7 @@ ;; Author: MORIOKA Tomohiko ;; Created: 1997/3/4 -;; Version: $Id: emh-face.el,v 0.3 1997-03-14 05:41:55 morioka Exp $ +;; Version: $Id: emh-face.el,v 0.4 1997-05-22 03:24:36 morioka Exp $ ;; Keywords: header, highlighting ;; This file is part of emh. @@ -35,16 +35,12 @@ )) (defsubst emh-make-face-bold (face) - (condition-case err - (make-face-bold face) - (error (message "Can not make bold face `%s'." face)) - )) + (set-face-font face (face-font 'bold)) + ) (defsubst emh-make-face-italic (face) - (condition-case err - (make-face-bold face) - (error (message "Can not make italic face `%s'." face)) - )) + (set-face-font face (face-font 'italic)) + ) (or (find-face 'from-field-body) (progn -- 1.7.10.4