--- rat/lonratedt.pm 2002/08/30 22:28:05 1.31.2.1 +++ rat/lonratedt.pm 2002/08/26 12:38:40 1.33 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.31.2.1 2002/08/30 22:28:05 albertel Exp $ +# $Id: lonratedt.pm,v 1.33 2002/08/26 12:38:40 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -350,6 +350,113 @@ sub storemap { &Apache::lonratsrv::loadmap($fn,&Apache::lonratsrv::savemap($fn,'')); } +sub editscript { + my $mode=shift; + return(<print(<