From: Tollef Fog Heen <tfheen@err.no>
Date: Sat, 5 Aug 2017 21:58:17 +0000 (+0200)
Subject: Use a bit more modern perl in Util.pm, drop defined for an array check.
X-Git-Tag: release-0.3.40~8
X-Git-Url: https://git.adam-barratt.org.uk/?p=mirror%2Fuserdir-ldap-cgi.git;a=commitdiff_plain;h=590cf520c4108918c493ad992f39695eb27c181d

Use a bit more modern perl in Util.pm, drop defined for an array check.
---

diff --git a/Util.pm b/Util.pm
index b970caf..c292a1a 100644
--- a/Util.pm
+++ b/Util.pm
@@ -474,7 +474,7 @@ sub readwrite3($$$$) {
       }
     }
 
-    next unless (defined(@$readyr)); # Wait some more.
+    next unless (@$readyr); # Wait some more.
 
     for my $rfd (@$readyr) {
       if ($rfd->eof) {
diff --git a/debian/changelog b/debian/changelog
index 1b89e07..342d4f6 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -13,6 +13,9 @@ userdir-ldap-cgi (0.3.40) UNRELEASED; urgency=medium
   * Drop SSH key fingerprint info from machines.cgi pages
   * Give an example of the show command
 
+  [ Tollef Fog Heen ]
+  * Use a bit more modern perl in Util.pm, drop defined for an array check.
+
  -- Peter Palfrader <weasel@debian.org>  Sat, 03 Jan 2015 13:56:47 +0100
 
 userdir-ldap-cgi (0.3.39) unstable; urgency=medium