version 1.68, 2006/12/04 21:44:02
|
version 1.69, 2007/01/03 21:55:37
|
Line 3679 sub add_group_folder {
|
Line 3679 sub add_group_folder {
|
if ($action eq 'create') { |
if ($action eq 'create') { |
if (&get_folder_lock($cdom,$cnum,'group_allfolders',$now) eq 'ok') { |
if (&get_folder_lock($cdom,$cnum,'group_allfolders',$now) eq 'ok') { |
# check if group_allfolders.sequence exists. |
# check if group_allfolders.sequence exists. |
my ($errtext,$fatal)=&LONCAPA::map::mapread($allgrpsmap); |
my $mapcontents = &Apache::lonnet::getfile($allgrpsmap); |
if ($fatal == 2) { #file does not exist; |
if ($mapcontents eq '-1') { #file does not exist; |
my $grpstitle = &mt('[_1] [_2]s',$crstype,$ucgpterm); |
my $grpstitle = &mt('[_1] [_2]s',$crstype,$ucgpterm); |
my $topmap_url = '/'.$env{'course.'.$env{'request.course.id'}.'.url'}; |
my $topmap_url = '/'.$env{'course.'.$env{'request.course.id'}.'.url'}; |
$topmap_url =~ s|/+|/|g; |
$topmap_url =~ s|/+|/|g; |