--- loncom/interface/lonprintout.pm 2013/06/05 14:16:18 1.627.2.6 +++ loncom/interface/lonprintout.pm 2013/08/08 15:40:59 1.627.2.7 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.627.2.6 2013/06/05 14:16:18 raeburn Exp $ +# $Id: lonprintout.pm,v 1.627.2.7 2013/08/08 15:40:59 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -3313,7 +3313,7 @@ ENDPART $moreenv{'CODE'}=&num_to_letters($code); } my $actual_seq = \@master_seq; - if ($randomorder) { + if ($randomorder || $randompick) { $env{'form.CODE'} = $moreenv{'CODE'}; $actual_seq = master_seq_to_person_seq($map, \@master_seq, undef, @@ -4141,13 +4141,13 @@ sub printHelper { my $start_new_option; if ($perm{'pav'}) { $start_new_option = - "