This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Refactor FindExt, merging scan_ext() and find_ext().
authorNicholas Clark <nick@ccl4.org>
Mon, 17 Jun 2013 09:27:16 +0000 (11:27 +0200)
committerNicholas Clark <nick@ccl4.org>
Tue, 2 Jul 2013 13:33:28 +0000 (15:33 +0200)
commit33881c928ba43758652bf4037675cb7216359ce3
treed4e22e3d5198afc5c65fb84658a288a6f5dc7661
parente298842055e9af7cdfaee43509096b8dcbb7036c
Refactor FindExt, merging scan_ext() and find_ext().

The return value of FindExt::scan_ext() has never been used, since FindExt
was first added by commit 8e2329934bcca9c5 in April 2001. The call to
FindExt::extensions() has no side effects, so it can be eliminated. Hence
FindExt::scan_ext() is a trivial wrapper around FindExt::find_ext(), and the
two can be merged.

Also, simplify the logic for "known" extensions. The complexity of checking
the hash first was needed when extension directories were nested. It should
have been removed as part of commit 1f8a0b38638b171c in Feb 2009.
win32/FindExt.pm