From f4fe820707074f27ecb3f595966c0f9b9b8a034b Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Mon, 21 Aug 2023 16:58:24 +0200 Subject: [PATCH] Don't describe lexbound uncompiled function as 'closures' * lisp/help-fns.el (help-fns-function-description-header): Describe lexbound uncompiled functions as functions. Whether they technically close over any lexical variables isn't of interest here. --- lisp/help-fns.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/help-fns.el b/lisp/help-fns.el index 99c464f8b26..22cfbbc39cd 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -1084,10 +1084,8 @@ Returns a list of the form (REAL-FUNCTION DEF ALIASED REAL-DEF)." (concat beg "byte-compiled Lisp function")) ((module-function-p def) (concat beg "module function")) - ((eq (car-safe def) 'lambda) + ((memq (car-safe def) '(lambda closure)) (concat beg "Lisp function")) - ((eq (car-safe def) 'closure) - (concat beg "Lisp closure")) ((keymapp def) (let ((is-full nil) (elts (cdr-safe def))) -- 2.39.5