diff --git a/src/notifications.scm b/src/notifications.scm
index 31c9884..25387dd 100644
--- a/src/notifications.scm
+++ b/src/notifications.scm
@@ -56,7 +56,7 @@
 
  ;; Prints email to the console
  (define (print-notification-email em)
-   (print "### From: " (ldict-ref em 'from "-"))
+   (print "### From: " (ldict-ref em 'from (*email-from*)))
    (print "### To: " (ldict-ref em 'to))
    (print "### Subject: " (ldict-ref em 'subject))
    (let loop ((lines (ldict-ref em 'body)))