--- loncom/interface/lonquickgrades.pm	2021/07/19 15:48:26	1.121
+++ loncom/interface/lonquickgrades.pm	2021/11/30 15:55:37	1.122
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Quick Student Grades Display
 #
-# $Id: lonquickgrades.pm,v 1.121 2021/07/19 15:48:26 raeburn Exp $
+# $Id: lonquickgrades.pm,v 1.122 2021/11/30 15:55:37 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -86,8 +86,9 @@ sub real_handler {
     if ($env{'request.course.id'}) {
         my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
         my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
+        my $clientip = &Apache::lonnet::get_requestor_ip($r);
         my ($blocked,$blocktext) =
-            &Apache::loncommon::blocking_status('grades',$cnum,$cdom);
+            &Apache::loncommon::blocking_status('grades',$clientip,$cnum,$cdom);
         if ($blocked) {
             my $checkrole = "cm./$cdom/$cnum";
             if ($env{'request.course.sec'} ne '') {