[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;