[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm
bowersj2
lon-capa-cvs@mail.lon-capa.org
Tue, 30 Sep 2003 14:43:26 -0000
bowersj2 Tue Sep 30 10:43:26 2003 EDT
Modified files:
/loncom/interface lonprintout.pm
Log:
Fix for a little interaction between my code and Alex's.
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.242 loncom/interface/lonprintout.pm:1.243
--- loncom/interface/lonprintout.pm:1.242 Mon Sep 29 16:06:20 2003
+++ loncom/interface/lonprintout.pm Tue Sep 30 10:43:26 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Printout
#
-# $Id: lonprintout.pm,v 1.242 2003/09/29 20:06:20 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.243 2003/09/30 14:43:26 bowersj2 Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1225,7 +1225,8 @@
# If we're in a sequence...
if (($helper->{'VARS'}->{'construction'} ne '1') &&
- $helper->{VARS}->{'postdata'} && $sequenceTitle) {
+ $helper->{VARS}->{'postdata'} &&
+ $helper->{VARS}->{'assignment'}) {
# Allow problems from sequence
push @{$printChoices}, ["<b>Problems</b> in $sequenceTitle", 'map_problems', 'CHOOSE_PROBLEMS'];
# Allow all resources from sequence
@@ -1260,7 +1261,7 @@
# problems in the course, optionally for selected students
if ($userPriviledged && ($helper->{VARS}->{'postdata'}=~/\/res\//)) {
push @{$printChoices}, ['Problems from <b>entire course</b>', 'all_problems', 'ALL_PROBLEMS'];
- if ($sequenceTitle) {
+ if ($helper->{VARS}->{'assignment'}) {
push @{$printChoices}, ["Problems from $sequenceTitle for <b>selected students</b>", 'problems_for_students', 'CHOOSE_STUDENTS'];
}