diff --git a/macos/set-defaults.sh b/macos/set-defaults.sh
index ce81405ae..050850e0a 100755
--- a/macos/set-defaults.sh
+++ b/macos/set-defaults.sh
@@ -235,6 +235,8 @@ echo ""
 echo "› Mail:"
 echo "  › Add the keyboard shortcut CMD + Enter to send an email"
 defaults write com.apple.mail NSUserKeyEquivalents -dict-add "Send" "@\U21a9"
+# shellcheck disable=SC2016
+defaults write com.apple.mail NSUserKeyEquivalents -dict-add "Archive" '@$e'
 
 echo "  › Disable smart quotes as it's annoying for messages that contain code"
 defaults write com.apple.messageshelper.MessageController SOInputLineSettings -dict-add "automaticQuoteSubstitutionEnabled" -bool false