This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #113932] Make UNIVERSAL::can("STDOUT"...) work
authorFather Chrysostomos <sprout@cpan.org>
Sat, 13 Jul 2013 05:53:48 +0000 (22:53 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 13 Jul 2013 06:12:05 +0000 (23:12 -0700)
commit2bde9ae6d41328ef8a0af7287fdbcbb982befeea
treee14ad85858a7140d178025e38e0580cd86e9de87
parentdb20b64061eaadedacbeffa6da95dab094e4cb40
[perl #113932] Make UNIVERSAL::can("STDOUT"...) work

For consistency with the way method lookup works, UNIVERSAL::can(...)
should treat a bareword representing a filehandle as a lookup in the
IO::File package (or whichever package implements that filehandle
object).
t/op/universal.t
universal.c