--- loncom/interface/lonmeta.pm 2000/10/21 10:46:35 1.1 +++ loncom/interface/lonmeta.pm 2000/10/23 13:21:12 1.2 @@ -6,7 +6,7 @@ # # 05/29/00,05/30,10/11 Gerd Kortemeyer) # -# 10/19,10/21 Gerd Kortemeyer +# 10/19,10/21,10/23 Gerd Kortemeyer package Apache::lonmeta; @@ -60,6 +60,9 @@ sub handler { %content=&unpackagemeta(join("\n",@metacontents),1); # --------------------------------------------------------------- Render Output + +my $creationdate=localtime($content{'creationdate'}); +my $lastrevisiondate=localtime($content{'lastrevisiondate'}); $r->print(<Catalog Information @@ -75,8 +78,8 @@ sub handler {
MIME Type: $content{'mime'}
Language: $content{'language'}
-Creation Date: $content{'creationdate'}
-Last Revision Date: $content{'lastrevisiondate'}
+Creation Date: $creationdate
+Last Revision Date: $lastrevisiondate
Publisher/Owner: $content{'owner'}
Copyright/Distribution: $content{'copyright'}