From: Stefan Kangas Date: Tue, 16 Jul 2024 01:35:59 +0000 (+0200) Subject: Checkdoc fixes in transient.el X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=65a260c5b7a0c2a98298fcdacdd431a5d2727478;p=emacs.git Checkdoc fixes in transient.el * lisp/transient.el (transient-format-description): Checkdoc fixes. (cherry picked from commit e3bba63ecb9302d5a30c7ec55fa564aa9aba2b11) --- diff --git a/lisp/transient.el b/lisp/transient.el index 08bb7b53719..cebc8131f5e 100644 --- a/lisp/transient.el +++ b/lisp/transient.el @@ -4000,9 +4000,9 @@ and its value is returned to the caller." set " "))))) (cl-defmethod transient-format-description ((obj transient-group)) - "Format the description by calling the next method. If the result -doesn't use the `face' property at all, then apply the face -`transient-heading' to the complete string." + "Format the description by calling the next method. +If the result doesn't use the `face' property at all, then apply the +face `transient-heading' to the complete string." (and-let* ((desc (transient--get-description obj))) (cond ((oref obj inapt) (propertize desc 'face 'transient-inapt-suffix)) @@ -4011,8 +4011,9 @@ doesn't use the `face' property at all, then apply the face ((propertize desc 'face 'transient-heading))))) (cl-defmethod transient-format-description :around ((obj transient-suffix)) - "Format the description by calling the next method. If the result -is nil, then use \"(BUG: no description)\" as the description. + "Format the description by calling the next method. +If the result is nil, then use \"(BUG: no description)\" as the +description. If the OBJ's `key' is currently unreachable, then apply the face `transient-unreachable' to the complete string." (let ((desc (or (cl-call-next-method obj)