diff --git a/emodule/emodule.el b/emodule/emodule.el
index bcdddd7..5981bd6 100644
--- a/emodule/emodule.el
+++ b/emodule/emodule.el
@@ -353,13 +353,16 @@ this macro."
   (let (upgrades)
     (dolist (entry package-alist)
       (let* ((pkg-desc (cadr entry))
-             (pkg-name (package-desc-name pkg-desc))
-             (pkg-version (package-desc-version pkg-desc))
-             (pkg-avail (assq pkg-name package-archive-contents))
-             (pkg-avail-desc (cadr pkg-avail))
-             (pkg-avail-version (package-desc-version pkg-avail-desc)))
-        (when (version-list-< pkg-version pkg-avail-version)
-          (push pkg-name upgrades))))
+             (pkg-name (package-desc-name pkg-desc)))
+        (emodule/print-log (format "Checking package '%s' for upgrade" pkg-name))
+        (let* ((pkg-version (package-desc-version pkg-desc))
+               (pkg-avail (assq pkg-name package-archive-contents))
+               (pkg-avail-desc (cadr pkg-avail))
+               (pkg-avail-version (package-desc-version pkg-avail-desc)))
+          (when (version-list-< pkg-version pkg-avail-version)
+            (progn
+              (emodule/print-log (format "Package '%s' will be upgraded" pkg-name))
+              (push pkg-name upgrades))))))
     upgrades))
 
 (defun emodule/upgrade ()