From a11fc4fe979dff00fb394dade34a7efce70eb2ad Mon Sep 17 00:00:00 2001
From: Dylan William Hardison <dylan@hardison.net>
Date: Thu, 22 Dec 2016 20:24:31 -0500
Subject: Bug 1325425 - checksetup.pl on windows should ensure $/ is "\r\n"

r=dkl,a=dylan
---
 Bugzilla/Install.pm | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'Bugzilla')

diff --git a/Bugzilla/Install.pm b/Bugzilla/Install.pm
index b02a3a7e9..e90d545a8 100644
--- a/Bugzilla/Install.pm
+++ b/Bugzilla/Install.pm
@@ -307,6 +307,10 @@ sub create_admin {
     my $dbh      = Bugzilla->dbh;
     my $template = Bugzilla->template;
 
+    # We must ensure $/ is set to \r\n on windows.
+    # CGI.pm unsets.
+    local $/ = ON_WINDOWS ? "\x0d\x0a" : "\x0a";
+
     my $admin_group = new Bugzilla::Group({ name => 'admin' });
     my $admin_inheritors =
         Bugzilla::Group->flatten_group_membership($admin_group->id);
-- 
cgit v1.2.3-24-g4f1b