--- loncom/lonnet/perl/lonnet.pm 2007/12/21 04:32:49 1.934 +++ loncom/lonnet/perl/lonnet.pm 2007/12/21 04:34:50 1.935 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.934 2007/12/21 04:32:49 raeburn Exp $ +# $Id: lonnet.pm,v 1.935 2007/12/21 04:34:50 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -8867,7 +8867,7 @@ explanation of a user role term =item * -get_my_roles($uname,$udom,$context,$types,$roles,$roledoms) : +get_my_roles($uname,$udom,$context,$types,$roles,$roledoms,$withsec) : All arguments are optional. Returns a hash of a roles, either for co-author/assistant author roles for a user's Construction Space (default), or if $context is 'userroles', roles for the user himself,