From 3dd7c80de9c1dbb2be31087010c05985288f37a5 Mon Sep 17 00:00:00 2001
From: Tony Garnock-Jones <tonyg@leastfixedpoint.com>
Date: Thu, 18 Feb 2021 20:26:38 +0100
Subject: [PATCH] Repair config key usage

---
 src/users.rkt | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/src/users.rkt b/src/users.rkt
index cba22e0..a8e5422 100644
--- a/src/users.rkt
+++ b/src/users.rkt
@@ -31,9 +31,11 @@
       (send-account-registration-email! email)))
 
 (define (sender-address)
-  (or (@ (config) user-directory)
+  (or (@ (config) email-sender-address)
       "pkgs@racket-lang.org"))
 
+(log-racket-pkg-website/users-info "Will use sender address ~v" (sender-address))
+
 (define (send-password-reset-email! email)
   (log-racket-pkg-website/users-info "Sending password reset email to ~v" email)
   (send-mail-message