--- 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 .= '
| ';
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;
}
|