[LON-CAPA-cvs] cvs: loncom /homework structuretags.pm
foxr
foxr@source.lon-capa.org
Mon, 07 Dec 2009 11:46:33 -0000
foxr Mon Dec 7 11:46:33 2009 EDT
Modified files:
/loncom/homework structuretags.pm
Log:
BZ 4378 - Put some vertical space prior to the pts box so it won't ovewrite
the answers of the previous part.
Index: loncom/homework/structuretags.pm
diff -u loncom/homework/structuretags.pm:1.462 loncom/homework/structuretags.pm:1.463
--- loncom/homework/structuretags.pm:1.462 Sun Dec 6 21:22:50 2009
+++ loncom/homework/structuretags.pm Mon Dec 7 11:46:33 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# definition of tags that give a structure to a document
#
-# $Id: structuretags.pm,v 1.462 2009/12/06 21:22:50 raeburn Exp $
+# $Id: structuretags.pm,v 1.463 2009/12/07 11:46:33 foxr Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1125,7 +1125,9 @@
'\textit{'.$duedate_text.'} '.$toc_line;
} else {
$frontmatter.= $begin_doc.$toc_line;
- if ($Apache::lonhomework::type eq 'exam' and $allow_print_points==1) { $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';}
+ if ($Apache::lonhomework::type eq 'exam' and $allow_print_points==1) {
+ $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';
+ }
}
} else {
$frontmatter .= '\vskip 1mm\textit{'.$duedate_text.'} \\\\\\\\'.$startminipage;
@@ -1133,7 +1135,9 @@
} else {
if (not $env{'request.symb'} =~ m/\.page_/) {
$frontmatter .= $begin_doc.$toc_line;
- if (($Apache::lonhomework::type eq 'exam') and ($allow_print_points==1)) { $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';}
+ if (($Apache::lonhomework::type eq 'exam') and ($allow_print_points==1)) {
+ $frontmatter .= '\fbox{\textit{'.$weight.' pt}}';
+ }
} else {
$frontmatter .= '\vskip 1mm \\\\\\\\'.$startminipage;
}
@@ -1775,7 +1779,10 @@
'.disableexampointprint'}) eq 'yes') {
$allow_print_points=0;
}
- if (($Apache::lonhomework::type eq 'exam') && ($allow_print_points)) { $result .= '\fbox{\textit{'.$weight.' pt}}';}
+ if (($Apache::lonhomework::type eq 'exam') && ($allow_print_points)) {
+ $result .= '\vskip 10mm\fbox{\textit{'.$weight.' pt}}';
+
+ }
} elsif ($target eq 'web') {
$result.='<a name="'.&escape($Apache::inputtags::part).'" />';
}