Function: package--add-to-compatibility-table

package--add-to-compatibility-table is a byte-compiled function defined in package.el.gz.

Signature

(package--add-to-compatibility-table PKG)

Documentation

If PKG is compatible (without dependencies), add to the compatibility table.

PKG is a package-desc object. Only adds if its version is higher than what's already stored in the table.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/package.el.gz
(defun package--add-to-compatibility-table (pkg)
  "If PKG is compatible (without dependencies), add to the compatibility table.
PKG is a package-desc object.
Only adds if its version is higher than what's already stored in
the table."
  (unless (package--incompatible-p pkg 'shallow)
    (let* ((name (package-desc-name pkg))
           (version (or (package-desc-version pkg) '(0)))
           (table-version (gethash name package--compatibility-table)))
      (when (or (not table-version)
                (version-list-< table-version version))
        (puthash name version package--compatibility-table)))))