[LON-CAPA-cvs] cvs: loncom /homework edit.pm structuretags.pm
raeburn
lon-capa-cvs-allow@mail.lon-capa.org
Tue, 26 Aug 2008 03:18:29 -0000
raeburn Mon Aug 25 23:18:29 2008 EDT
Modified files:
/loncom/homework structuretags.pm edit.pm
Log:
Better fix so textarea in a "text block" in colorful edit mode extends fully to the right.
- Putting back the insertlist removed in 1.426 (future functionality might need it).
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.428 loncom/homework/structuretags.pm:1.429
--- loncom/homework/structuretags.pm:1.428 Thu Aug 21 16:46:23 2008
+++ loncom/homework/structuretags.pm Mon Aug 25 23:18:29 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.428 2008/08/21 20:46:23 raeburn Exp $
+# $Id: structuretags.pm,v 1.429 2008/08/26 03:18:29 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1887,7 +1887,6 @@
my ($target,$token,$tagstack,$parstack,$parser,$safeeval,$style)=@_;
my $result='';
my $text='';
-
if ($target eq 'edit') {
my $areaid = 'homework_edit_'.$Apache::lonxml::curdepth;
$text=&Apache::lonxml::get_all_text("endouttext",$parser,$style);
@@ -1898,7 +1897,10 @@
unless ($env{'environment.wysiwygeditor'} eq 'on') {
$result.='<td align="left">'
.&Apache::lonhtmlcommon::dragmath_button($areaid,1)
- .'</td>';
+ .'</td>'
+ .'<td>'
+ .&Apache::edit::insertlist($target,$token)
+ .'</td>';
}
$result.='<td align="right" valign="top">' .
&Apache::loncommon::helpLatexCheatsheet().
Index: loncom/homework/edit.pm
diff -u loncom/homework/edit.pm:1.114 loncom/homework/edit.pm:1.115
--- loncom/homework/edit.pm:1.114 Tue Mar 11 22:46:52 2008
+++ loncom/homework/edit.pm Mon Aug 25 23:18:29 2008
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# edit mode helpers
#
-# $Id: edit.pm,v 1.114 2008/03/12 02:46:52 raeburn Exp $
+# $Id: edit.pm,v 1.115 2008/08/26 03:18:29 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -128,7 +128,7 @@
return $result;
}
-sub start_spanning_row { return '<tr><td colspan="4" bgcolor="#DDDDDD">';}
+sub start_spanning_row { return '<tr><td colspan="5" bgcolor="#DDDDDD">';}
sub start_row { return '<tr><td bgcolor="#DDDDDD">'; }
sub end_row { return '</td></tr>'; }