--- loncom/lonnet/perl/lonnet.pm	2015/04/15 04:11:17	1.1282
+++ loncom/lonnet/perl/lonnet.pm	2015/04/15 18:56:19	1.1283
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.1282 2015/04/15 04:11:17 raeburn Exp $
+# $Id: lonnet.pm,v 1.1283 2015/04/15 18:56:19 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -7332,7 +7332,7 @@ sub get_commblock_resources {
                             if ($timesup > $now) {
                                 my $activeblock;
                                 foreach my $res (@to_test) {
-                                    if ($res->completable()) {
+                                    if ($res->answerable()) {
                                         $activeblock = 1;
                                         last;
                                     }