projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 9f3ee5e) | patch
Refactor IPC::Open3::_open3() to find the caller's package itself.
authorNicholas Clark <nick@ccl4.org>
Mon, 6 Jun 2011 12:29:19 +0000 (14:29 +0200)
committerNicholas Clark <nick@ccl4.org>
Sat, 11 Jun 2011 06:48:14 +0000 (08:48 +0200)
commit0689e260481390ae18db4d1043f84f46f17a2951
tree9efb2c370c2724ceebb2851d4f87a75bae2d3f7etree | snapshot
parent9f3ee5ee9bc539518437e56340843b97afc63320commit | diff
Refactor IPC::Open3::_open3() to find the caller's package itself.

Previously it was passed in as a parameter by IPC::Open2::open2() and
IPC::Open3::open3(), each of which used C<calller> to find it. Move the use of
caller to one place.

It would also be possible to use C<caller> to eliminate the first parameter to
_open3(), but this would add more code than it removes, so doesn't seem wise.
ext/IPC-Open2/lib/IPC/Open2.pm diff | blob | history
ext/IPC-Open3/lib/IPC/Open3.pm diff | blob | history
Domain: System / Base;