loncom/LondConnection.pm - diff

Return to LondConnection.pm CVS log

Up to [LON-CAPA] / loncom

version 1.21, 2003/12/22 11:03:17	version 1.23, 2004/01/06 09:35:22
Line 127 sub Dump {	Line 127 sub Dump {
my $self = shift;	my $self = shift;
my $key;	my $key;
my $value;	my $value;
print "Dumping LondConnectionObject:\n";	print STDERR "Dumping LondConnectionObject:\n";
while(($key, $value) = each %$self) {	while(($key, $value) = each %$self) {
print "$key -> $value\n";	print STDERR "$key -> $value\n";
}	}
print "-------------------------------\n";	print STDERR "-------------------------------\n";
}	}

=pod	=pod