[LON-CAPA-cvs] cvs: loncom /homework structuretags.pm
sakharuk
lon-capa-cvs@mail.lon-capa.org
Thu, 20 Jun 2002 17:48:35 -0000
sakharuk Thu Jun 20 13:48:35 2002 EDT
Modified files:
/loncom/homework structuretags.pm
Log:
can print pages, but the problem of fixed minipage width still not
resolved. I am working on it now.
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.95 loncom/homework/structuretags.pm:1.96
--- loncom/homework/structuretags.pm:1.95 Fri May 24 17:57:38 2002
+++ loncom/homework/structuretags.pm Thu Jun 20 13:48:35 2002
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.95 2002/05/24 21:57:38 albertel Exp $
+# $Id: structuretags.pm,v 1.96 2002/06/20 17:48:35 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -201,7 +201,7 @@
#should get back a <html> or the neccesary stuff to start XML/MathML
my ($result,$head_tag_start,$body_tag_start)=
&page_start($target,$token,$tagstack,$parstack,$parser,$safeeval);
-
+ if ($target eq 'tex' and $ENV{'request.symb'} =~ m/\.page_/) { $result = '';}
if ($target eq 'web' || $target eq 'grade' || $target eq 'answer') {
#handle exam checkout
@@ -301,7 +301,11 @@
$result=$token->[4];
$result.=&Apache::edit::handle_insert();
} elsif ($target eq 'tex') {
- $result .= '\begin{document} ';
+ if (not $ENV{'request.symb'} =~ m/\.page_/) {
+ $result .= '\begin{document} ';
+ } else {
+ $result .= '\begin{minipage}{\minipagewidth} ';
+ }
} else {
# page_start returned a starting result, delete it if we don't need it
$result = '';
@@ -347,7 +351,12 @@
&Apache::lonxml::debug("in end_problem with $target, edit");
$result='<br /><input type="submit" name="submit" value="Submit Changes" />';
} elsif ($target eq 'tex') {
- $result .= '\vskip 0.5mm\noindent\makebox[9.0cm][b]{\hrulefill}\end{document}';
+ $result .= '\vskip 0.5mm\noindent\makebox[9.0cm][b]{\hrulefill}';
+ if (not $ENV{'request.symb'} =~ m/\.page_/) {
+ $result .= '\end{document} ';
+ } else {
+ $result .= '\end{minipage} ';
+ }
}
return $result;
}