From 209ddde37bbc1415757ef5dc773099d54b79e357 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 24 Jul 1997 06:03:00 +0000 Subject: [PATCH] (custom-declare-face): Use [set-]face-documentation. --- lisp/cus-face.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/cus-face.el b/lisp/cus-face.el index 3662f296baa..bd120299a16 100644 --- a/lisp/cus-face.el +++ b/lisp/cus-face.el @@ -54,8 +54,8 @@ (setq frame (car frames) frames (cdr frames)) (face-spec-set face value frame))))) - (when (and doc (null (face-doc-string face))) - (set-face-doc-string face doc)) + (when (and doc (null (face-documentation face))) + (set-face-documentation face doc)) (custom-handle-all-keywords face args 'custom-face) (run-hooks 'custom-define-hook)) face) -- 2.39.5