--- loncom/lond	2002/08/09 17:43:30	1.88
+++ loncom/lond	2002/08/09 18:18:36	1.89
@@ -2,7 +2,7 @@
 # The LearningOnline Network
 # lond "LON Daemon" Server (port "LOND" 5663)
 #
-# $Id: lond,v 1.88 2002/08/09 17:43:30 albertel Exp $
+# $Id: lond,v 1.89 2002/08/09 18:18:36 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -1604,7 +1604,7 @@ sub chatadd {
 	foreach (keys %hash) {
 	    my ($thistime)=($_=~/(\d+)\_/);
 	    if ($thistime<$expired) {
-		undef $hash{$_};
+		delete $hash{$_};
 	    }
 	}
 	untie %hash;