--- loncom/lonnet/perl/lonnet.pm 2004/11/06 21:18:27 1.523.2.11 +++ loncom/lonnet/perl/lonnet.pm 2004/11/06 21:27:40 1.523.2.12 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.523.2.11 2004/11/06 21:18:27 albertel Exp $ +# $Id: lonnet.pm,v 1.523.2.12 2004/11/06 21:27:40 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -40,7 +40,7 @@ qw(%perlvar %hostname %homecache %badSer %courselogs %accesshash %userrolehash $processmarker $dumpcount %coursedombuf %coursenumbuf %coursehombuf %coursedescrbuf %courseinstcodebuf %courseresdatacache %userresdatacache %usectioncache %domaindescription %domain_auth_def %domain_auth_arg_def - %domain_lang_def %domain_city %domain_longi %domain_lati $tmpdir); + %domain_lang_def %domain_city %domain_longi %domain_lati $tmpdir $_64bit); use IO::Socket; use GDBM_File; @@ -52,7 +52,6 @@ use Apache::lonlocal; use Storable qw(lock_store lock_nstore lock_retrieve freeze thaw); use Time::HiRes qw( gettimeofday tv_interval ); my $readit; -my $_64bit; =pod