In perl.git, the branch arc/win32-perlbug has been updated <http://perl5.git.perl.org/perl.git/commitdiff/24963b0a8d4dddbe29a3709011cab46fdc3deee1?hp=72d1391b2738867ddf368a86715a306cb5bb3397>
discards 72d1391b2738867ddf368a86715a306cb5bb3397 (commit) - Log ----------------------------------------------------------------- commit 24963b0a8d4dddbe29a3709011cab46fdc3deee1 Author: Aaron Crane <[email protected]> Date: Tue May 17 12:24:54 2016 +0100 perlbug: don't run editor when noninteractive This fixes tests on Win32. ----------------------------------------------------------------------- Summary of changes: utils/perlbug.PL | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/utils/perlbug.PL b/utils/perlbug.PL index f399e5d..720cf12 100644 --- a/utils/perlbug.PL +++ b/utils/perlbug.PL @@ -114,7 +114,7 @@ EOF } Query(); -Edit() unless $running_noninteractively || $usefile || ($ok and not $opt{n}); +Edit() unless $usefile || ($ok and not $opt{n}); NowWhat(); if ($outfile) { save_message_to_disk($outfile); @@ -755,7 +755,7 @@ sub Edit { $ed = $entry unless $entry eq ''; } - _edit_file($ed); + _edit_file($ed) unless $running_noninteractively; } sub _edit_file { -- Perl5 Master Repository
