--- rat/lonratedt.pm 2013/06/04 22:20:34 1.108
+++ rat/lonratedt.pm 2014/02/14 16:05:42 1.109
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Edit Handler for RAT Maps
#
-# $Id: lonratedt.pm,v 1.108 2013/06/04 22:20:34 raeburn Exp $
+# $Id: lonratedt.pm,v 1.109 2014/02/14 16:05:42 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -229,22 +229,27 @@ sub smpedt {
my ($errtext,$fatal)=
&LONCAPA::map::mapread(&Apache::lonnet::filelocation('',$url),'');
unless ($fatal) {
- $targetmsg=''.&mt('Saved.').'
';
+ $targetmsg=&Apache::lonhtmlcommon::confirm_success(&mt('Saved'));
} else {
- $targetmsg=''.&mt('An error occurred while saving.').'
';
+ $targetmsg=&Apache::lonhtmlcommon::confirm_success(
+ &mt('An error occurred while saving.'),1);
}
}
if ($env{'form.revert'}) {
- $targetmsg=''.&mt('Reverted.').'
';
+ $targetmsg=&Apache::lonhtmlcommon::confirm_success(&mt('Reverted'));
unlink($tmpfn);
my ($errtext,$fatal)=
&LONCAPA::map::mapread(&Apache::lonnet::filelocation('',$url),'');
}
+ $targetmsg = &Apache::loncommon::confirmwrapper($targetmsg) if $targetmsg;
if (-e $tmpfn) {
$targetmsg=
- ''.&mt('You are working with an unsaved version of your map.').'
';
+ '
' + .&mt('You are working with an unsaved version of your map.') + .'
'; my ($errtext,$fatal)=&LONCAPA::map::mapread($tmpfn,''); } + $errtext = ''.$errtext.'
' if ($errtext); # ---------------------------------------------------------- Process form input my @importselect=&Apache::loncommon::get_env_multiple('form.importsel'); @@ -487,6 +492,7 @@ sub smpedt { my $editscript=&editscript('simple'); my %lt=&Apache::lonlocal::texthash( + 'sm' => 'Select Map', 'sa' => 'Save', 'nt' => 'New Title', 'se' => 'Search', @@ -508,9 +514,7 @@ sub smpedt { 'pas' => 'Paste after selected', 'reco' => 'Recover Deleted' ); - my $js=<