--- loncom/lonnet/perl/lonnet.pm	2004/04/03 00:13:01	1.485
+++ loncom/lonnet/perl/lonnet.pm	2004/04/05 18:07:38	1.486
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.485 2004/04/03 00:13:01 raeburn Exp $
+# $Id: lonnet.pm,v 1.486 2004/04/05 18:07:38 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -32,7 +32,8 @@ package Apache::lonnet;
 use strict;
 use LWP::UserAgent();
 use HTTP::Headers;
-use Date::Parse;
+use HTTP::Date;
+# use Date::Parse;
 use vars 
 qw(%perlvar %hostname %homecache %badServerCache %hostip %iphost %spareid %hostdom 
    %libserv %pr %prp %metacache %packagetab %titlecache %courseresversioncache %resversioncache
@@ -4690,7 +4691,7 @@ sub getuploaded {
 	return 'failed';
     }      
     if ($reqtype eq 'HEAD') {
-	$$info = &Date::Parse::str2time( $response->header('Last-modified') );
+	$$info = &HTTP::Date::str2time( $response->header('Last-modified') );
     } elsif ($reqtype eq 'GET') {
 	$$info = $response->content;
     }