[LON-CAPA-cvs] cvs: loncom /interface lonprintout.pm

[sakharuk]

sakharuk		Tue Jan 28 15:36:17 2003 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  Buf 1167 is fixed.
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.106 loncom/interface/lonprintout.pm:1.107
--- loncom/interface/lonprintout.pm:1.106	Mon Jan 27 11:01:13 2003
+++ loncom/interface/lonprintout.pm	Tue Jan 28 15:36:17 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.106 2003/01/27 16:01:13 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.107 2003/01/28 20:36:17 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -162,14 +162,14 @@
     my @titles_master_seq = &titles_coming_from_hash($primary_sequence,$sequence[0]);
     foreach my $entity (@titles_master_seq) {$entity=~/^(.*)&&/; $entity=$1}
     my @master_seq_view = @master_seq;
-    if (not $ENV{'request.role'}=~/^st\./) {
+    if ($ENV{'user.adv'}) {
       for (my $i=0;$i<=$#master_seq_view;$i++) {
 	 $master_seq_view[$i]=~/___\d+___(.+)$/;
 	 $master_seq_view[$i]='/'.$1;
       }
     } else {
       for (my $i=0;$i<=$#master_seq_view;$i++) {
-	  $master_seq_view[$i]=' ';
+         $master_seq_view[$i]=' ';
       }
     }
     $r->print(<<ENDMENUOUT1);
@@ -216,9 +216,11 @@
       }
     }
     $r->print(<<ENDMENUOUT2);
-<br />
+<br /><br />
 <input type="hidden" name="numberoffiles" value="$inc">
 <input type="hidden" name="phase" value="three">
+<input type=button onClick="checkall()" value="Check All">&nbsp;
+<input type=button onClick="uncheckall()" value="Uncheck">&nbsp;
 <input type="submit" value="Submit">
 ENDMENUOUT2
 
@@ -277,7 +279,8 @@
     }
 </script>
 <input type=button onClick="checkall()" value="Check All">&nbsp;
-<input type=button onClick="uncheckall()" value="Uncheck">
+<input type=button onClick="uncheckall()" value="Uncheck">&nbsp;
+<input type="submit" value="Submit">
 <p>
 ENDMENUOUT1
     my $i=0;
@@ -287,10 +290,12 @@
 	$i++;
     }
     $r->print(<<ENDMENUOUT2);
-<br />
+<br /><br />
 <input type="hidden" name="papersize" value="$ENV{'form.papersize'}">
 <input type="hidden" name="numberofproblems" value="$i">
 <input type="hidden" name="phase" value="three">
+<input type=button onClick="checkall()" value="Check All">&nbsp;
+<input type=button onClick="uncheckall()" value="Uncheck">&nbsp;
 <input type="submit" value="Submit">
 ENDMENUOUT2
 }