[LON-CAPA-cvs] cvs: loncom /homework structuretags.pm
sakharuk
lon-capa-cvs@mail.lon-capa.org
Thu, 27 Jun 2002 18:47:24 -0000
sakharuk Thu Jun 27 14:47:24 2002 EDT
Modified files:
/loncom/homework structuretags.pm
Log:
Can print page without previous limitations. Checked only
for linear pages and for single page resource. Working further.
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.99 loncom/homework/structuretags.pm:1.100
--- loncom/homework/structuretags.pm:1.99 Tue Jun 25 11:01:49 2002
+++ loncom/homework/structuretags.pm Thu Jun 27 14:47:23 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.99 2002/06/25 15:01:49 sakharuk Exp $
+# $Id: structuretags.pm,v 1.100 2002/06/27 18:47:23 sakharuk Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -288,9 +288,9 @@
my $duedate = &Apache::lonnet::EXT("resource.$id.duedate");
$duedate = POSIX::strftime("%c",localtime($duedate));
if (not $ENV{'request.symb'} =~ m/\.page_/) {
- $result .= '\begin{document} \noindent\fbox{Due date: '.$duedate.'} \\vskip 1 mm';
+ $result .= '\begin{document} \noindent\fbox{Due date: '.$duedate.'} \vskip 1 mm';
} else {
- $result .= '\begin{minipage}{\minipagewidth}\vskip 1mm\fbox{Due date: '.$duedate.'} \\vskip 1 mm';
+ $result .= '\parbox{\minipagewidth}{\vskip 1mm\fbox{Due date: '.$duedate.'} \\\\\\\\';
}
}
} elsif ($target eq 'edit') {
@@ -360,7 +360,7 @@
if (not $ENV{'request.symb'} =~ m/\.page_/) {
$result .= '\end{document} ';
} else {
- $result .= '\end{minipage} ';
+ $result .= '} ';
}
}
return $result;