From 6badcf61d436ac7483d4e932ec0a991cb60746d7 Mon Sep 17 00:00:00 2001
From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Fri, 14 Aug 2009 19:38:04 +0100
Subject: [PATCH] Encode instance in emails properly

---
 yarrg/commod-update-receiver | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/yarrg/commod-update-receiver b/yarrg/commod-update-receiver
index 9c8dd30..cd9ef83 100755
--- a/yarrg/commod-update-receiver
+++ b/yarrg/commod-update-receiver
@@ -147,9 +147,10 @@ foreach my $mid (<_mid-*.hold>) {
     unlink $mid or $!==&ENOENT or die "$mid $!";
 }
 
+$o{'instance'}= $ENV{'YARRG_INSTANCE'};
 
 my $mcontent= MIME::Entity->build(To => 'yarrg-commod-updates',
-				  Subject => $pwd,
+				  Subject => $ENV{'YARRG_INSTANCE'},
 				  Type => 'multipart/mixed',
 				  Boundary => '=',
 				  'Message-ID' => $mid,
-- 
2.30.2