fhem.pl: add can check for SSL pending (Forum #73642)

git-svn-id: https://svn.fhem.de/fhem/trunk@16813 2b470e98-0d58-463d-a4d8-8e2adae1ed80
2018-06-03 21:42:58 +00:00
parent 5ca4b34f01
commit 27f983e9ec
1 changed files with 2 additions and 1 deletions
--- a/fhem/fhem.pl
+++ b/fhem/fhem.pl
@@ -657,7 +657,8 @@ while (1) {
    }
    vec($ein, $hash->{EXCEPT_FD}, 1) = 1
        if(defined($hash->{"EXCEPT_FD"}));
-    if($hash->{SSL} && $hash->{CD} && $hash->{CD}->pending()) {
+    if($hash->{SSL} && $hash->{CD} &&
+       $hash->{CD}->can('pending') && $hash->{CD}->pending()) {
      vec($rout, $hash->{FD}, 1) = 1;
      $nfound++;
    }