about summary refs log tree commit homepage
path: root/scripts/ssoma-replay
diff options
context:
space:
mode:
Diffstat (limited to 'scripts/ssoma-replay')
-rwxr-xr-xscripts/ssoma-replay3
1 files changed, 2 insertions, 1 deletions
diff --git a/scripts/ssoma-replay b/scripts/ssoma-replay
index 91c121dd..3c3fdf48 100755
--- a/scripts/ssoma-replay
+++ b/scripts/ssoma-replay
@@ -53,7 +53,8 @@ if (defined $list_id) {
                 if ($mid =~ /\A<(.+)>\z/) {
                         $mid = $1;
                 }
-                $mid = uri_escape_utf8($mid);
+                $mid = uri_escape_utf8($mid,
+                                '^A-Za-z0-9\-\._~!\$\&\';\(\)\*\+,;=:@');
                 $header_obj->header_set('List-Archive', "<$archive_url>");
 
                 foreach my $h (qw(Help Unsubscribe Subscribe Owner)) {