changeset 3969:6851e4266920

* 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.
author Jim Blandy <jimb@redhat.com>
date Sun, 04 Jul 1993 01:46:30 +0000
parents e6f0cff88f06
children 020fe391d5c1
files lisp/faces.el
diffstat 1 files changed, 5 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/faces.el	Sat Jul 03 21:11:51 1993 +0000
+++ b/lisp/faces.el	Sun Jul 04 01:46:30 1993 +0000
@@ -498,7 +498,7 @@
     (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 (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 (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 (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 (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)