--- rat/lonratedt.pm 2015/03/11 21:09:04 1.105.2.7
+++ rat/lonratedt.pm 2016/01/15 19:13:04 1.112
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Edit Handler for RAT Maps
#
-# $Id: lonratedt.pm,v 1.105.2.7 2015/03/11 21:09:04 raeburn Exp $
+# $Id: lonratedt.pm,v 1.112 2016/01/15 19:13:04 damieng Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -43,32 +43,89 @@ use HTML::Entities();
# --------------------------------------------------------- Build up RAT screen
sub ratedt {
my ($r,$url)=@_;
- my %layout = ('border' => "0");
- if ($env{'environment.remote'} eq 'off') {
- $layout{'rows'} = "1,250,*";
- } else {
- $layout{'rows'} = "1,70,*";
- }
- my $js ='
-';
-
- my $start_page =
- &Apache::loncommon::start_page('Edit Sequence',$js,
- {'frameset' => 1,
- 'add_entries' => \%layout});
-
- my $end_page =
- &Apache::loncommon::end_page({'frameset' => 1});
-
$r->print(<
' - .&mt('You are working with an unsaved version of your map.') - .'
'; - my ($errtext,$fatal)=&LONCAPA::map::mapread($tmpfn,''); + $targetmsg= + '' + .&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 @@ -496,7 +553,7 @@ sub smpedt { my $editscript=&editscript('simple'); my %lt=&Apache::lonlocal::texthash( - 'sm' => 'Select Map', + 'sm' => 'Select Map', 'sa' => 'Save', 'nt' => 'New Title', 'se' => 'Search', @@ -629,11 +686,11 @@ $importwindow+
-
$lt{'pas'}