[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 3df581972ff: ; Simplify recent change in cl-defstruct
From: |
Stefan Kangas |
Subject: |
master 3df581972ff: ; Simplify recent change in cl-defstruct |
Date: |
Sun, 1 Oct 2023 12:45:45 -0400 (EDT) |
branch: master
commit 3df581972ffcd25ac8c8aaa4c0984843efc6aee1
Author: Stefan Kangas <stefankangas@gmail.com>
Commit: Stefan Kangas <stefankangas@gmail.com>
; Simplify recent change in cl-defstruct
* lisp/emacs-lisp/cl-macs.el (cl-defstruct): Use bound-and-true-p.
Suggested by Robert Pluim <rpluim@gmail.com>.
---
lisp/emacs-lisp/cl-macs.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
index 7c207d372fc..8025a64f1bf 100644
--- a/lisp/emacs-lisp/cl-macs.el
+++ b/lisp/emacs-lisp/cl-macs.el
@@ -3200,8 +3200,8 @@ To see the documentation for a defined struct type, use
;; choose to avoid the byte-compiler
;; warnings.
(if (>= (length long-docstring)
- (or (and (boundp
'byte-compile-docstring-max-column)
- byte-compile-docstring-max-column)
+ (or (bound-and-true-p
+ byte-compile-docstring-max-column)
80))
(concat
(internal--format-docstring-line
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 3df581972ff: ; Simplify recent change in cl-defstruct,
Stefan Kangas <=