--- loncom/lonnet/perl/lonnet.pm 2016/11/13 22:44:34 1.1172.2.86 +++ loncom/lonnet/perl/lonnet.pm 2016/11/15 20:56:37 1.1172.2.87 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1172.2.86 2016/11/13 22:44:34 raeburn Exp $ +# $Id: lonnet.pm,v 1.1172.2.87 2016/11/15 20:56:37 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5732,7 +5732,7 @@ sub check_adhoc_privs { $setprivs = 1; } } else { - &set_adhoc_privileges($cdom,$cnum,$checkrole,$caller); + &set_adhoc_privileges($cdom,$cnum,$checkrole,$caller,$sec); $setprivs = 1; } return $setprivs;