summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/IPC/Open2.pm
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/IPC/Open2.pm')
-rw-r--r--Master/tlpkg/tlperl/lib/IPC/Open2.pm5
1 files changed, 2 insertions, 3 deletions
diff --git a/Master/tlpkg/tlperl/lib/IPC/Open2.pm b/Master/tlpkg/tlperl/lib/IPC/Open2.pm
index 5f555bcfa4e..9e27144571d 100644
--- a/Master/tlpkg/tlperl/lib/IPC/Open2.pm
+++ b/Master/tlpkg/tlperl/lib/IPC/Open2.pm
@@ -6,7 +6,7 @@ our ($VERSION, @ISA, @EXPORT);
require 5.000;
require Exporter;
-$VERSION = 1.03;
+$VERSION = 1.04;
@ISA = qw(Exporter);
@EXPORT = qw(open2);
@@ -114,8 +114,7 @@ require IPC::Open3;
sub open2 {
local $Carp::CarpLevel = $Carp::CarpLevel + 1;
- return IPC::Open3::_open3('open2', scalar caller,
- $_[1], $_[0], '>&STDERR', @_[2 .. $#_]);
+ return IPC::Open3::_open3('open2', $_[1], $_[0], '>&STDERR', @_[2 .. $#_]);
}
1