[LON-CAPA-cvs] cvs: loncom /lti ltipassback.pm

[raeburn]

raeburn		Tue Dec 12 02:13:21 2017 EDT

  Modified files:              
    /loncom/lti	ltipassback.pm 
  Log:
  - Bug 6754 LON-CAPA as LTI Consumer
    - temporarily set $env{'request.course.id'} so lonnet::courselog() can
      log CSTORE in activity.log for person assigned a score via passback service.
  
  
Index: loncom/lti/ltipassback.pm
diff -u loncom/lti/ltipassback.pm:1.3 loncom/lti/ltipassback.pm:1.4
--- loncom/lti/ltipassback.pm:1.3	Sat Dec  9 16:24:03 2017
+++ loncom/lti/ltipassback.pm	Tue Dec 12 02:13:21 2017
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # LTI Consumer Module to receive grades passed back by Provider 
 #
-# $Id: ltipassback.pm,v 1.3 2017/12/09 16:24:03 raeburn Exp $
+# $Id: ltipassback.pm,v 1.4 2017/12/12 02:13:21 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -283,8 +283,10 @@
                 }
             }
             if (%newrecord) {
+                $env{'request.course.id'} = $cdom.'_'.$cnum;
                 my $result = &Apache::lonnet::cstore(\%newrecord,$symb,$cdom.'_'.$cnum,
                                                      $udom,$uname);
+                delete($env{'request.course.id'});
                 if (($result eq 'ok') || ($result eq 'con_delayed')) {
                     &success($r,$params->{'sourcedid'},$resulttype,$result,$lang);
                 } else {