--- loncom/interface/coursecatalog.pm 2006/12/11 15:13:26 1.12
+++ loncom/interface/coursecatalog.pm 2007/01/06 20:12:19 1.14
@@ -631,7 +631,7 @@ sub get_valid_classes {
@{$validations{'xlists'}} = ();
my $totalitems = 0;
if ($seclist) {
- foreach my $sec (split(',',$seclist)) {
+ foreach my $sec (split(/, /,$seclist)) {
my $class = $crscode.$sec;
if (&Apache::lonnet::auto_validate_class_sec($cdom,$cnum,$owner,
$class) eq 'ok') {
@@ -643,7 +643,7 @@ sub get_valid_classes {
}
}
if ($xlist_items) {
- foreach my $item (split(',',$xlist_items)) {
+ foreach my $item (split(/, /,$xlist_items)) {
if (&Apache::lonnet::auto_validate_class_sec($cdom,$cnum,$owner,
$item) eq 'ok') {
if (!grep(/^\Q$item$\E/,@{$validations{'xlists'}})) {
@@ -656,11 +656,11 @@ sub get_valid_classes {
if ($totalitems > 0) {
if (@{$validations{'sections'}}) {
$response = &mt('Sections: ').
- join(',',@{$validations{'sections'}}).'
';
+ join(', ',@{$validations{'sections'}}).'
';
}
if (@{$validations{'xlists'}}) {
$response .= &mt('Courses: ').
- join(',',@{$validations{'xlists'}});
+ join(', ',@{$validations{'xlists'}});
}
}
return $response;