--- loncom/interface/loncommon.pm 2001/12/25 21:02:35 1.20 +++ loncom/interface/loncommon.pm 2001/12/25 21:57:54 1.21 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.20 2001/12/25 21:02:35 www Exp $ +# $Id: loncommon.pm,v 1.21 2001/12/25 21:57:54 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -50,11 +50,11 @@ my %fe; my %fd; my %fc; # -------------------------------------------------------------- Thesaurus data -my @therelated=(); -my @theword=(); -my @thecount=(); -my %theindex=(); -my $thetotalcount=0; +my @therelated; +my @theword; +my @thecount; +my %theindex; +my $thetotalcount; my $thefuzzy=2; my $thethreshold=0.1/$thefuzzy; my $theavecount;