diff --git a/pkgs/scripts/uffd-unused-accounts-notification.scm b/pkgs/scripts/uffd-unused-accounts-notification.scm
index cf7fa92..ab85c65 100644
--- a/pkgs/scripts/uffd-unused-accounts-notification.scm
+++ b/pkgs/scripts/uffd-unused-accounts-notification.scm
@@ -67,7 +67,6 @@ union all select displayname, mail, '2022' from user where not exists (select *
 
 (define (mk-email displayname last-login)
   #"
-Subject: meow
 Hallo ~|displayname|!
 
 Wir haben schon lange (seit über einem Jahr; dein letzter Login war um ~|last-login|)
@@ -96,7 +95,7 @@ list of these accounts, invoke it with the \"list-accounts\" option.
 (define (send-email address subject text)
   (when verbose
     (display (format "sending email to ~a\n" address)))
-  (let ([text (string-append "subject: " subject "\n" text "\n")])
+  (let ([text (string-append "from: admin@hacc.space\n" "subject: " subject "\n" text "\n")])
     (when very-verbose
       (display text))
     (call-with-output-process