From eacaa9905ac00841083d791995a50633ce713688 Mon Sep 17 00:00:00 2001 From: Jim Blandy Date: Sun, 4 Jul 1993 01:46:30 +0000 Subject: [PATCH] * faces.el (make-face-bold, make-face-italic, make-face-bold-italic, make-face-unbold, make-face-unitalic): Properly pass noerror argument to recursive calls. --- lisp/faces.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/lisp/faces.el b/lisp/faces.el index 9d84a3dd85..a9481f30ad 100644 --- a/lisp/faces.el +++ b/lisp/faces.el @@ -498,7 +498,7 @@ If NOERROR is non-nil, return nil on failure." (if (null frame) (let ((frames (frame-list))) (while frames - (make-face-bold face (car frames)) + (make-face-bold face (car frames) noerror) (setq frames (cdr frames)))) (setq face (internal-get-face face frame)) (setq font (or (face-font face frame) @@ -522,7 +522,7 @@ If NOERROR is non-nil, return nil on failure." (if (null frame) (let ((frames (frame-list))) (while frames - (make-face-italic face (car frames)) + (make-face-italic face (car frames) noerror) (setq frames (cdr frames)))) (setq face (internal-get-face face frame)) (setq font (or (face-font face frame) @@ -546,7 +546,7 @@ If NOERROR is non-nil, return nil on failure." (if (null frame) (let ((frames (frame-list))) (while frames - (make-face-bold-italic face (car frames)) + (make-face-bold-italic face (car frames) noerror) (setq frames (cdr frames)))) (setq face (internal-get-face face frame)) (setq font (or (face-font face frame) @@ -586,7 +586,7 @@ If NOERROR is non-nil, return nil on failure." (if (null frame) (let ((frames (frame-list))) (while frames - (make-face-unbold face (car frames)) + (make-face-unbold face (car frames) noerror) (setq frames (cdr frames)))) (setq face (internal-get-face face frame)) (setq font1 (or (face-font face frame) @@ -608,7 +608,7 @@ If NOERROR is non-nil, return nil on failure." (if (null frame) (let ((frames (frame-list))) (while frames - (make-face-unitalic face (car frames)) + (make-face-unitalic face (car frames) noerror) (setq frames (cdr frames)))) (setq face (internal-get-face face frame)) (setq font1 (or (face-font face frame) -- 2.20.1