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

[sakharuk]

sakharuk		Thu Nov 14 09:47:53 2002 EDT

  Modified files:              
    /loncom/interface	lonprintout.pm 
  Log:
  Bug 951 is fixed. I've changed test of the user role to the test of brousing
  the resource. Now I have to hide a lot of options in the printout menu for
  the case of printing from the construction space to which you came directly 
  from the resource space - working on this (with probably more corrections  of
  the same type as above menthioned). By the way, I've found that a lot of user
  privilages are not completely implemented. For example, the privelage "ere" -
  create, edit, modify, and publish resource can not be used in the allow function(from lonnet).	
     
  
  
Index: loncom/interface/lonprintout.pm
diff -u loncom/interface/lonprintout.pm:1.85 loncom/interface/lonprintout.pm:1.86
--- loncom/interface/lonprintout.pm:1.85	Tue Oct 29 15:58:50 2002
+++ loncom/interface/lonprintout.pm	Thu Nov 14 09:47:53 2002
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.85 2002/10/29 20:58:50 sakharuk Exp $
+# $Id: lonprintout.pm,v 1.86 2002/11/14 14:47:53 sakharuk Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -378,7 +378,7 @@
       $selectionmade = 1;
       my %moreenv;
       $moreenv{'form.grade_target'}='tex';
-      if ($ENV{'request.role'}=~m/^au\./ or $ENV{'request.role'}=~m/^ca\./) {
+      if (&Apache::lonnet::allowed('bre',$ENV{'form.url'})) {
 	  $ENV{'form.url'}=~s/http:\/\/[^\/]+//;
       }
       $moreenv{'request.filename'}=$ENV{'form.url'};