commit 67cdd1030b3022d3dc4da2297f55349da57cde01
parent f865f17ad04cd270685187b0a5331ec8eb06e541
Author: AdriĆ Garriga-Alonso <adria.garriga@gmail.com>
Date: Sun, 20 Feb 2022 23:08:08 +0000
Fix `helpful--autoloaded-p` in Emacs 29.0.50 (#283)
Fix `helpful--autoloaded-p` in Emacs 29.0.50
Diffstat:
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/helpful.el b/helpful.el
@@ -1837,7 +1837,11 @@ OBJ may be a symbol or a compiled function object."
"Return non-nil if function SYM is autoloaded."
(-when-let (file-name (buffer-file-name buf))
(setq file-name (s-chop-suffix ".gz" file-name))
- (help-fns--autoloaded-p sym file-name)))
+ (condition-case nil
+ (help-fns--autoloaded-p sym file-name)
+ ; new in Emacs 29.0.50
+ ; see https://github.com/Wilfred/helpful/pull/283
+ (error (help-fns--autoloaded-p sym)))))
(defun helpful--compiled-p (sym)
"Return non-nil if function SYM is byte-compiled"