--- rat/lonratedt.pm 2012/04/18 17:37:12 1.105 +++ rat/lonratedt.pm 2012/12/16 16:09:02 1.105.2.4 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.105 2012/04/18 17:37:12 raeburn Exp $ +# $Id: lonratedt.pm,v 1.105.2.4 2012/12/16 16:09:02 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -43,8 +43,12 @@ use HTML::Entities(); # --------------------------------------------------------- Build up RAT screen sub ratedt { my ($r,$url)=@_; - my %layout = ('border' => "0", - 'rows' => "1,250,*"); + my %layout = ('border' => "0"); + if ($env{'environment.remote'} eq 'off') { + $layout{'rows'} = "1,250,*"; + } else { + $layout{'rows'} = "1,70,*"; + } my $js =' <script type="text/javascript"> var flag=0; @@ -72,7 +76,7 @@ ENDDOCUMENT sub buttons { my $adv=shift; - my $output='<form method="post">'; + my $output='<form method="post" action="">'; if ($adv==1) { $output.= '<input type="submit" name="forceadv"' @@ -491,7 +495,7 @@ sub smpedt { 'nt' => 'New Title', 'se' => 'Search', 'im' => 'Import', - 'wl' => 'Import from Wishlist', + 'wl' => 'Import from Stored Links', 'vi' => 'View', 'lm' => 'Load Map', 'ds' => 'Discard Selected', @@ -572,7 +576,7 @@ ENDJS $r->print(<<ENDSMPHEAD); $start_page <span class="LC_error">$errtext</span> -<form name="simpleedit" method="post"> +<form name="simpleedit" method="post" action=""> <input type="hidden" name="forcesmp" value="1" /> <input type="hidden" name="renameres" value="0" /> <input type="hidden" name="renametitle" value="" /> @@ -582,37 +586,37 @@ $start_page <th> </th> <th width="40%">File: $url</th></tr> <tr><td bgcolor="#FFFFCC"> -<input type="button" onClick="javascript:groupsearch()" value="$lt{'se'}" /> -<input type="button" onClick="javascript:groupimport();" value="$lt{'im'}" /> +<input type="button" onclick="javascript:groupsearch()" value="$lt{'se'}" /> +<input type="button" onclick="javascript:groupimport();" value="$lt{'im'}" /> $lt{'as'} <hr /> <input type="text" size="20" name="importmap" /> <input type="button" -onClick="javascript:openbrowser('simpleedit','importmap','sequence,page','')" +onclick="javascript:openbrowser('simpleedit','importmap','sequence,page','')" value="Select Map" /><input type="submit" name="loadmap" value="$lt{'lm'}" /><hr /> <input type="submit" name="discard" value="$lt{'ds'}" /> <input type="submit" name="clear" value="$lt{'ca'}" /> -<input type="button" onClick="javascript:viewimport()" value="$lt{'vi'}" /> +<input type="button" onclick="javascript:viewimport()" value="$lt{'vi'}" /> </td><td> </td><td bgcolor="#FFFFCC"> -<input type="button" onClick= +<input type="button" onclick= "javascript:impfortarget.value=1;groupsearch()" value="$lt{'se'}" /> -<input type="button" onClick= +<input type="button" onclick= "javascript:impfortarget.value=1;groupimport();" value="$lt{'im'}" /> -<input type="button" onClick= -"javascript:impfortarget.value=1;open_Wishlist_Import('simple');" value="$lt{'wl'}" /> -<input type="button" onClick= +<input type="button" onclick= +"javascript:impfortarget.value=1;open_StoredLinks_Import('simple');" value="$lt{'wl'}" /> +<input type="button" onclick= "javascript:impfortarget.value=1;groupopen('$url',1);" value="$lt{'reco'}" /> $lt{'as'} <hr /> <input type="submit" name="moveup" value="$lt{'mu'}" /> <input type="submit" name="movedown" value="$lt{'md'}" /> -<input type="button" onClick="javascript:renametarget()" value="$lt{'re'}" /> +<input type="button" onclick="javascript:renametarget()" value="$lt{'re'}" /> <hr />$targetmsg <input type="submit" name="revert" value="$lt{'rv'}" /> <input type="submit" name="save" value="$lt{'sa'}" /> -<input type="button" onClick="javascript:viewtarget()" value="$lt{'vi'}" /> +<input type="button" onclick="javascript:viewtarget()" value="$lt{'vi'}" /> </td></tr> <tr><td bgcolor="#FFFFCC"><select name="importsel" size="10" multiple="multiple"> @@ -730,7 +734,7 @@ sub viewmap { $cstrurl =~ s{^/res/}{/priv/}; $r->print(&Apache::loncommon::start_data_table_row() .'<td>' - .'<img src="'.&Apache::loncommon::icon($resfilepath).'" />' + .'<img src="'.&Apache::loncommon::icon($resfilepath).'" alt="" />' .'</td>' .'<td>' .&HTML::Entities::encode(&LONCAPA::map::qtescape($title))