[BACK]Return to lonratedt.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / rat

Diff for /rat/lonratedt.pm between versions 1.98 and 1.100

version 1.98, 2009/12/04 11:13:58 version 1.100, 2010/08/20 08:13:38
Line 43  use HTML::Entities(); Line 43  use HTML::Entities();
 # --------------------------------------------------------- Build up RAT screen  # --------------------------------------------------------- Build up RAT screen
 sub ratedt {  sub ratedt {
   my ($r,$url)=@_;    my ($r,$url)=@_;
   my %layout = ('border' => "0");    my %layout = ('border' => "0",
     if ($env{'environment.remote'} eq 'off') {                  'rows'   => "1,250,*");
       $layout{'rows'} = "1,250,*";  
   } else {  
       $layout{'rows'} = "1,70,*";  
   }  
   my $js ='    my $js ='
 <script type="text/javascript">  <script type="text/javascript">
     var flag=0;      var flag=0;
Line 496  sub smpedt { Line 492  sub smpedt {
       'se' => 'Search',        'se' => 'Search',
       'im' => 'Import',        'im' => 'Import',
                                       'bk' => 'Import Bookmarks',                                        'bk' => 'Import Bookmarks',
                                         'wl' => 'Import from Wishlist',
       'vi' => 'View',        'vi' => 'View',
       'lm' => 'Load Map',        'lm' => 'Load Map',
       'ds' => 'Discard Selected',        'ds' => 'Discard Selected',
Line 607  value="Select Map" /><input type="submit Line 604  value="Select Map" /><input type="submit
 <input type="button" onClick=  <input type="button" onClick=
 "javascript:impfortarget.value=1;groupopen(0,1,1);" value="$lt{'bk'}" />  "javascript:impfortarget.value=1;groupopen(0,1,1);" value="$lt{'bk'}" />
 <input type="button" onClick=  <input type="button" onClick=
   "javascript:impfortarget.value=1;open_Wishlist_Import('simple');" value="$lt{'wl'}" />
   <input type="button" onClick=
 "javascript:impfortarget.value=1;groupopen('$url',1,0);" value="$lt{'reco'}" />  "javascript:impfortarget.value=1;groupopen('$url',1,0);" value="$lt{'reco'}" />
 $lt{'as'}  $lt{'as'}
 <hr />  <hr />
Removed from v.1.98  
changed lines
  Added in v.1.100

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>