--- rat/lonratedt.pm 2002/06/24 14:12:04 1.31 +++ rat/lonratedt.pm 2002/08/20 13:02:41 1.32 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.31 2002/06/24 14:12:04 www Exp $ +# $Id: lonratedt.pm,v 1.32 2002/08/20 13:02:41 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -347,6 +347,113 @@ sub storemap { &Apache::lonratsrv::loadmap($fn,&Apache::lonratsrv::savemap($fn,'')); } +sub editscript { + my $mode=shift; + return(<print(<