aboutsummaryrefslogtreecommitdiff
path: root/helpful.el
diff options
context:
space:
mode:
authorAdriĆ  Garriga-Alonso <adria.garriga@gmail.com>2022-02-20 23:08:08 +0000
committerGitHub <noreply@github.com>2022-02-20 15:08:08 -0800
commit67cdd1030b3022d3dc4da2297f55349da57cde01 (patch)
tree88bee6fdf7905a017ceb04b132d0e53a3e651ca0 /helpful.el
parentf865f17ad04cd270685187b0a5331ec8eb06e541 (diff)
Fix `helpful--autoloaded-p` in Emacs 29.0.50 (#283)
Fix `helpful--autoloaded-p` in Emacs 29.0.50
Diffstat (limited to 'helpful.el')
-rw-r--r--helpful.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/helpful.el b/helpful.el
index 2870c7e..8b6188d 100644
--- 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"