(describe-variable-custom-version-info): Handle dotted
authorJohn Paul Wallington <jpw@pobox.com>
Sat, 31 May 2008 18:19:05 +0000 (18:19 +0000)
committerJohn Paul Wallington <jpw@pobox.com>
Sat, 31 May 2008 18:19:05 +0000 (18:19 +0000)
`package-version' info.

lisp/help-fns.el

index f3b166a..1d1130f 100644 (file)
@@ -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)