Bug 1325425 - checksetup.pl on windows should ensure $/ is "\r\n"

r=dkl,a=dylan
parent 1a0c5438
...@@ -307,6 +307,10 @@ sub create_admin { ...@@ -307,6 +307,10 @@ sub create_admin {
my $dbh = Bugzilla->dbh; my $dbh = Bugzilla->dbh;
my $template = Bugzilla->template; 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_group = new Bugzilla::Group({ name => 'admin' });
my $admin_inheritors = my $admin_inheritors =
Bugzilla::Group->flatten_group_membership($admin_group->id); Bugzilla::Group->flatten_group_membership($admin_group->id);
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment