From 1283e9e2e6d31ec006d6a5dcc9a18b2e028db58c Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Tue, 18 Aug 2009 23:06:20 -0700
Subject: [PATCH] fix x-loop addition

---
 scripts/process | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/scripts/process b/scripts/process
index 4d89eec..f0047db 100755
--- a/scripts/process
+++ b/scripts/process
@@ -721,8 +721,10 @@ if (length($resentccval)) {
 
 my $common_headers='';
 {
-    local $a = 0;
-    $common_headers = join('',map {$_.($a++%2?': ':"\n")} @common_headers);
+    my @tmp = @common_headers;
+    while (my ($key,$value) = splice(@tmp, 0,2)) {
+	$common_headers .= qq($key: $value\n);
+    }
 }
 if ($codeletter eq 'U') { # sent to -submitter
     &htmllog("Message", "sent on", $data->{originator}, "$gBug#$ref.");
-- 
2.39.2