Emacs 24.4 updates to JEG2's packages.el

packages.el

(defun jeg2/package-version-for (package)
  "Get the version of a loaded package."
  (package-desc-version (car (cdr (assoc package package-alist)))))

(defun jeg2/package-requirements (package)
  "List of recursive dependencies for a package."
  (let ((package-info (car (cdr (assoc package package-alist)))))
     (cond ((null package-info) (list package))
           (t
            (jeg2/flatten
             (cons package
                   (mapcar 'jeg2/package-requirements
                           (mapcar 'car (package-desc-reqs package-info)))))))))
                           
  (defun jeg2/package-delete-by-name (package)
  "Remove a package by name."
  (package-delete (car (cdr (assoc package package-alist)))))