Bug 144728 - Midair collision doubles line feeds. Patch by jouni@heikniemi.net; 2xr...

diff --git a/process_bug.cgi b/process_bug.cgi
index 450b839f1e3502851ec0fa8aa991a41fe734c90a..8356c76a59910c16ec69e56080ddcf9abe15321e 100755 (executable)
--- a/process_bug.cgi
+++ b/process_bug.cgi
@@ -865,6 +865,9 @@ foreach my $id (@idlist) {
         $vars->{'start_at'} = $::FORM{'longdesclength'};
         $vars->{'comments'} = GetComments($id);
         
+        $::FORM{'comment'} =~ s/\r\n/\n/g;     # Get rid of windows-style line endings.
+        $::FORM{'comment'} =~ s/\r/\n/g;       # Get rid of mac-style line endings.
+
         $::FORM{'delta_ts'} = $delta_ts;
         $vars->{'form'} = \%::FORM;