mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-25 07:28:20 +00:00
Code Issues Releases Activity

; Simplify recent change in cl-defstruct

Browse Source 
* lisp/emacs-lisp/cl-macs.el (cl-defstruct): Use bound-and-true-p.
Suggested by Robert Pluim <rpluim@gmail.com>.
This commit is contained in:
Stefan Kangas 2023-10-01 18:34:41 +02:00
parent 248adb4b77
commit 3df581972f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/emacs-lisp/cl-macs.el
View File

@ -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