diff options
| author | Niels Thykier <niels@thykier.net> | 2016-05-01 07:28:28 +0000 |
|---|---|---|
| committer | Niels Thykier <niels@thykier.net> | 2016-05-01 07:43:22 +0000 |
| commit | e2420e4c81dd303be862a7de4048ed495bd6b316 (patch) | |
| tree | ed68d0ac9cc5ff6da1d10121bb040a9ead4d06a5 /dh_installmanpages | |
| parent | c5b14e3e54d7ca74744f55d48ed2a9d3ec9d0244 (diff) | |
| download | debhelper-e2420e4c81dd303be862a7de4048ed495bd6b316.tar.gz | |
dh_*: Prefer 3-arg open
Signed-off-by: Niels Thykier <niels@thykier.net>
Diffstat (limited to 'dh_installmanpages')
| -rwxr-xr-x | dh_installmanpages | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/dh_installmanpages b/dh_installmanpages index d3935009..7f83089a 100755 --- a/dh_installmanpages +++ b/dh_installmanpages @@ -110,9 +110,9 @@ sub find_so_man { } # Test first line of file for the .so thing. - open (SOTEST,$_); - my $l=<SOTEST>; - close SOTEST; + open(my $fd, '<', $_); + my $l = <$fd>; + close($fd); if ($l=~m/\.so\s+(.*)/) { my $solink=$1; # This test is here to prevent links like ... man8/../man8/foo.8 |