--- loncom/interface/loncreatecourse.pm 2006/05/30 20:05:05 1.90 +++ loncom/interface/loncreatecourse.pm 2006/06/22 11:25:56 1.92 @@ -1,7 +1,7 @@ # The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.90 2006/05/30 20:05:05 raeburn Exp $ +# $Id: loncreatecourse.pm,v 1.92 2006/06/22 11:25:56 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -238,9 +238,6 @@ sub copydbfiles { unless ($_=~/^(nohist\_|discussiontimes|classlist|versionupdate|resourcedata|\Q$origcrs_discussion\E|slots|slot_reservations|gradingqueue|reviewqueue|CODEs)/) { ©db($origcrsid,$newcrsid,$_); - my $histfile=$_; - $histfile=~s/\.db$/\.hist/; - ©file($origcrsid,$newcrsid,$histfile); } } } @@ -426,10 +423,10 @@ END &Apache::loncommon::start_page($titles{$env{'form.phase'}},$js); my $end_page = &Apache::loncommon::end_page(); - my $type = $crstype; - my $crumbs = &Apache::lonhtmlcommon::breadcrumbs(&mt('[_1] Information', - $type),'Create_Course', - undef,'Create_Courses'); + my $crumbs = + &Apache::lonhtmlcommon::breadcrumbs($crstype.' Information', + 'Create_Course',undef, + 'Create_Courses'); $r->print($start_page.$crumbs); if ($crstype eq 'Course') { $r->print(<print($start_page.$crumbs);