 ;;
 
 (defun doom-package-outdated-p (package)
-  "Determine whether PACKAGE (a symbol) is outdated or not. Be sure to run
+  "Determine whether PACKAGE (a symbol) is outdated or not. If outdated, returns
+a cons cell, whose car is the current version string of PACKAGE (a symbol), and
+whose cdr is the latest version of the package. Be sure to run
 `package-refresh-contents' beforehand, or the return value could be out of
 date."
   (let ((pkg (assq package doom-packages)))

        (message "There were %s errors" err)))))

(defun doom/packages-clean ()
  "Delete packages that are no longer used or referred to."
  (interactive)
  (let* ((package-selected-packages (-intersection (package--find-non-dependencies)
                                                   (mapcar 'car doom-packages)))

    (load (concat doom-emacs-dir "init.el"))))

(defun doom/packages-update ()
  "Update outdated packages. This includes quelpa-installed packages and ELPA
packages. This will delete old versions of packages as well."
  (interactive)
  (package-refresh-contents)
  (package-read-all-archive-contents)
