--- loncom/lonnet/perl/lonnet.pm 2016/11/13 22:07:55 1.1329 +++ loncom/lonnet/perl/lonnet.pm 2016/11/15 20:46:35 1.1330 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1329 2016/11/13 22:07:55 raeburn Exp $ +# $Id: lonnet.pm,v 1.1330 2016/11/15 20:46:35 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -5848,7 +5848,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;