[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm
bowersj2
lon-capa-cvs@mail.lon-capa.org
Thu, 02 Oct 2003 19:10:07 -0000
bowersj2 Thu Oct 2 15:10:07 2003 EDT
Modified files:
/loncom/interface lonprintout.pm
Log:
Make the third choice of lonprintout work, instead of going to Select a
Sequence. (Copy & paste error; two choices had the same computer value.)
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.247 loncom/interface/lonprintout.pm:1.248
--- loncom/interface/lonprintout.pm:1.247 Thu Oct 2 11:33:03 2003
+++ loncom/interface/lonprintout.pm Thu Oct 2 15:10:06 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Printout
#
-# $Id: lonprintout.pm,v 1.247 2003/10/02 15:33:03 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.248 2003/10/02 19:10:06 bowersj2 Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1352,7 +1352,7 @@
# another resource selector for that sequence
if (!$helper->{VARS}->{'construction'}) {
push @$printChoices, ["Resources from <b>selected sequence</b> in course",
- 'map_problems_pages', 'CHOOSE_SEQUENCE'];
+ 'selected_sequence', 'CHOOSE_SEQUENCE'];
my $escapedSequenceName = $helper->{VARS}->{'SEQUENCE'};
#Escape apostrophes and backslashes for Perl
$escapedSequenceName =~ s/\\/\\\\/g;