--- loncom/interface/loncommon.pm 2008/06/30 03:56:27 1.663 +++ loncom/interface/loncommon.pm 2008/07/06 05:01:52 1.664 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.663 2008/06/30 03:56:27 raeburn Exp $ +# $Id: loncommon.pm,v 1.664 2008/07/06 05:01:52 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -8544,8 +8544,9 @@ sub assign_category_rows { } } } - $text .= ''; + $text .= ''; if (ref($path) eq 'ARRAY') { push(@{$path},$name); $text .= &assign_category_rows($itemcount,$cats,$deeper,$name,$path,$currcategories); @@ -8565,12 +8566,12 @@ sub assign_category_rows { sub commit_customrole { - my ($udom,$uname,$url,$three,$four,$five,$start,$end) = @_; + my ($udom,$uname,$url,$three,$four,$five,$start,$end,$context) = @_; my $output = &mt('Assigning custom role').' "'.$five.'" by '.$four.':'.$three.' in '.$url. ($start?', '.&mt('starting').' '.localtime($start):''). ($end?', ending '.localtime($end):'').': '. &Apache::lonnet::assigncustomrole( - $udom,$uname,$url,$three,$four,$five,$end,$start). + $udom,$uname,$url,$three,$four,$five,$end,$start,undef,undef,$context). '
'; return $output; }