From 2d3eb16c36085efc6e70cc8cf8f2c59e070e0604 Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Tue, 12 May 2020 13:22:20 +0200 Subject: messages: closing?: Be more careful. --- mumi/messages.scm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/mumi/messages.scm b/mumi/messages.scm index 52d8a22..de2a30b 100644 --- a/mumi/messages.scm +++ b/mumi/messages.scm @@ -108,7 +108,8 @@ yet. Return new results alongside cached results." "Is this MESSAGE closing this bug ID?" (let ((done (string-append (number->string id) "-done"))) - (string= (header message 'x-debbugs-envelope-to) done))) + (and=> (header message 'x-debbugs-envelope-to) + (cut string= <> done)))) (define-public (bot? address) (string= "help-debbugs@gnu.org" address)) -- cgit v1.2.3