summary and outlook actually accept any text

[debbugs.git] / Debbugs / Control / Service.pm

diff --git a/Debbugs/Control/Service.pm b/Debbugs/Control/Service.pm
index fcd5d70b7805d8ab56feae46fafca63fd0dda386..7dcfdf4c4b6cef00924ff5141883ce47e625f7b4 100644 (file)
--- a/Debbugs/Control/Service.pm
+++ b/Debbugs/Control/Service.pm
@@ -148,8 +148,8 @@ my %control_grammar =
      package => qr/(?i)^package\:?\s+(\S.*\S)?\s*$/,
      limit => qr/(?i)^limit\:?\s+(\S.*\S)\s*$/,
      affects => qr/(?i)^affects?\s+\#?(-?\d+)(?:\s+((?:[=+-])?)\s*(\S.*)?)?\s*$/,
-     summary => qr/(?i)^summary\s+\#?(-?\d+)\s*(\d+|)\s*$/,
-     outlook => qr/(?i)^outlook\s+\#?(-?\d+)\s*(\d+|)\s*$/,
+     summary => qr/(?i)^summary\s+\#?(-?\d+)\s*(.*)\s*$/,
+     outlook => qr/(?i)^outlook\s+\#?(-?\d+)\s*(.*)\s*$/,
      owner => qr/(?i)^owner\s+\#?(-?\d+)\s+((?:\S.*\S)|\!)\s*$/,
      noowner => qr/(?i)^noowner\s+\#?(-?\d+)\s*$/,
      unarchive => qr/(?i)^unarchive\s+#?(\d+)$/,
@@ -189,6 +189,8 @@ sub control_line {
                                     },
                               limit => {type => HASHREF,
                                        },
+                              replyto => {type => SCALAR,
+                                         },
                              },
                     );
     my $line = $param{line};