--- loncom/interface/loncommon.pm 2008/05/29 19:35:53 1.657 +++ loncom/interface/loncommon.pm 2008/05/31 01:51:42 1.658 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.657 2008/05/29 19:35:53 raeburn Exp $ +# $Id: loncommon.pm,v 1.658 2008/05/31 01:51:42 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -151,7 +151,6 @@ sub ssi_with_retries { # ----------------------------------------------- Filetypes/Languages/Copyright my %language; -my %timezone; my %supported_language; my %cprtag; my %scprtag; @@ -194,22 +193,6 @@ BEGIN { close($fh); } } -# ------------------------------------------------------------------- timezones - { - my $timetabfile = $Apache::lonnet::perlvar{'lonTabDir'}. - '/timezone.tab'; - if ( open(my $fh,"<$timetabfile") ) { - while (my $line = <$fh>) { - next if ($line=~/^\#/); - chomp($line); - my $value=$line; - $value=~s/\_/ /g; - $timezone{$line}=$value; - } - close($fh); - } - } - # ------------------------------------------------------------------ copyrights { my $copyrightfile = $Apache::lonnet::perlvar{'lonIncludes'}.