--- loncom/interface/lonprintout.pm	2013/05/30 05:04:22	1.631
+++ loncom/interface/lonprintout.pm	2013/06/01 00:22:37	1.632
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.631 2013/05/30 05:04:22 raeburn Exp $
+# $Id: lonprintout.pm,v 1.632 2013/06/01 00:22:37 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3309,7 +3309,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,