diff options
author | John Paul Wallington <jpw@pobox.com> | 2008-05-31 18:19:05 +0000 |
---|---|---|
committer | John Paul Wallington <jpw@pobox.com> | 2008-05-31 18:19:05 +0000 |
commit | 22a1385df5257cb9d5170278c521bdf9ba4aaf68 (patch) | |
tree | c0c157638b3276791350609ffd5591bb29aa8d56 /lisp/help-fns.el | |
parent | 40de1a6acbf7842880217e373b7c14b9fca642f2 (diff) | |
download | emacs-22a1385df5257cb9d5170278c521bdf9ba4aaf68.tar.gz |
(describe-variable-custom-version-info): Handle dotted
`package-version' info.
Diffstat (limited to 'lisp/help-fns.el')
-rw-r--r-- | lisp/help-fns.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/help-fns.el b/lisp/help-fns.el index f3b166a33ca..1d1130f21a8 100644 --- a/lisp/help-fns.el +++ b/lisp/help-fns.el @@ -474,7 +474,9 @@ If ANY-SYMBOL is non-nil, don't insist the symbol be bound." custom-version)) (when cpv (let* ((package (car-safe cpv)) - (version (car (cdr-safe cpv))) + (version (if (listp (cdr-safe cpv)) + (car (cdr-safe cpv)) + (cdr-safe cpv))) (pkg-versions (assq package customize-package-emacs-version-alist)) (emacsv (cdr (assoc version pkg-versions)))) (if (and package version) |