--- loncom/interface/Attic/lonwizard.pm	2003/03/20 18:03:14	1.18
+++ loncom/interface/Attic/lonwizard.pm	2003/03/23 07:22:58	1.20
@@ -19,8 +19,6 @@ All classes are in the Apache::lonwizard
 
 =cut
 
-# To prevent runaway file counts, this file has lonwizard,
-# lonwizstate, and other wizard classes.
 use strict;
 
 use HTML::Entities;
@@ -945,7 +943,8 @@ sub render {
     my $date;
     
     # Default date: Now
-    $date = localtime($wizvars->{$var});
+    $date = localtime();
+    $date->min = 0;
 
     if (defined $self->{ERROR_MSG}) {
         $result .= '<font color="#FF0000">' . $self->{ERROR_MSG} . '</font><br /><br />';
@@ -1144,7 +1143,7 @@ sub render {
         $level = 9; # general course, see lonparmset.pm perldoc
         $affectedResourceId = "0.0";
     } elsif ($wizvars->{GRANULARITY} eq 'map') {
-        my $navmap = Apache::lonnavmaps::navmap->new(
+        my $navmap = Apache::lonnavmaps::navmap->new(Apache->request,
                            $ENV{"request.course.fn"}.".db",
                            $ENV{"request.course.fn"}."_parms.db", 0, 0);
         my $res = $navmap->getById($wizvars->{RESOURCE_ID});
@@ -1154,7 +1153,7 @@ sub render {
         $level = 8;
         $affectedResourceId = $wizvars->{RESOURCE_ID};
     } else {
-        my $navmap = Apache::lonnavmaps::navmap->new(
+        my $navmap = Apache::lonnavmaps::navmap->new(Apache->request,
                            $ENV{"request.course.fn"}.".db",
                            $ENV{"request.course.fn"}."_parms.db", 0, 0);
         my $res = $navmap->getById($wizvars->{RESOURCE_ID});