emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

master b03d6265cd: * lisp/emacs-lisp/oclosure.el (oclosure-define): Fix


From: Stefan Monnier
Subject: master b03d6265cd: * lisp/emacs-lisp/oclosure.el (oclosure-define): Fix empty case
Date: Sun, 8 May 2022 10:33:57 -0400 (EDT)

branch: master
commit b03d6265cd9427e11c5bfd4a56822b4475c8e8cd
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * lisp/emacs-lisp/oclosure.el (oclosure-define): Fix empty case
---
 lisp/emacs-lisp/oclosure.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/emacs-lisp/oclosure.el b/lisp/emacs-lisp/oclosure.el
index cb8c59b05a..9775e8cc65 100644
--- a/lisp/emacs-lisp/oclosure.el
+++ b/lisp/emacs-lisp/oclosure.el
@@ -223,7 +223,7 @@ list of slot properties.  The currently known properties 
are the following:
   `:mutable': A non-nil value mean the slot can be mutated.
   `:type': Specifies the type of the values expected to appear in the slot."
   (declare (doc-string 2) (indent 1))
-  (unless (stringp docstring)
+  (unless (or (stringp docstring) (null docstring))
     (push docstring slots)
     (setq docstring nil))
   (let* ((options (when (consp name)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]