--- loncom/interface/lonprintout.pm	2012/03/28 21:15:41	1.613
+++ loncom/interface/lonprintout.pm	2012/04/04 21:04:56	1.614
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Printout
 #
-# $Id: lonprintout.pm,v 1.613 2012/03/28 21:15:41 ramirez Exp $
+# $Id: lonprintout.pm,v 1.614 2012/04/04 21:04:56 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3475,9 +3475,44 @@ sub print_resources {
 
 }
 
+sub printing_blocked {
+    my ($r,$blocktext) = @_;
+    my $title = &mt('Preparing Printout');
+    &Apache::lonhtmlcommon::clear_breadcrumbs();
+    &Apache::lonhtmlcommon::add_breadcrumb({href=>'/adm/printout',
+                                            text=> $title});
+    my $breadcrumbs = &Apache::lonhtmlcommon::breadcrumbs($title);
+    &Apache::loncommon::content_type($r,'text/html');
+    &Apache::loncommon::no_cache($r);
+    $r->send_http_header;
+    $r->print(&Apache::loncommon::start_page('Preparing Printout').
+              $breadcrumbs.
+              $blocktext.
+              &Apache::loncommon::end_page());
+    return;
+}
+
 sub handler {
 
     my $r = shift;
+
+    if ($env{'request.course.id'}) {
+        my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
+        my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
+        my ($blocked,$blocktext) = 
+            &Apache::loncommon::blocking_status('printout',$cnum,$cdom);
+        if ($blocked) {
+            my $checkrole = "cm./$cdom/$cnum";
+            if ($env{'request.course.sec'} ne '') {
+                $checkrole .= "/$env{'request.course.sec'}";
+            }
+            unless ((&Apache::lonnet::allowed('evb',undef,undef,$checkrole)) && 
+                    ($env{'request.role'} !~ m{^st\./$cdom/$cnum})) {
+                &printing_blocked($r,$blocktext);
+                return OK;
+            }
+        }
+    }
     
     &init_perm();
 
@@ -3504,7 +3539,7 @@ sub handler {
 
     &output_data($r,$helper,\%parmhash);
     return OK;
-} 
+}
 
 use Apache::lonhelper;
 
@@ -4928,7 +4963,5 @@ sub postprocess {
     }
 }
 
-
-
 __END__