summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lisp')
-rw-r--r--lisp/simple.el9
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el
index 0255f69e427..fc3a4bd909d 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -2020,8 +2020,13 @@ This function uses the `read-extended-command-predicate' user option."
;; Has a current-name.
(functionp (car obsolete))
;; when >= emacs-major-version
- (>= (car (version-to-list (caddr obsolete)))
- emacs-major-version))))))
+ (condition-case nil
+ (>= (car (version-to-list
+ (caddr obsolete)))
+ emacs-major-version)
+ ;; If the obsoletion version isn't
+ ;; valid, include the command.
+ (error t)))))))
pred)))
(complete-with-action action obarray string pred))))
(lambda (sym)