version 1.54, 2006/07/20 03:11:52
|
version 1.55, 2006/07/20 22:17:14
|
Line 1825 sub privilege_specificity {
|
Line 1825 sub privilege_specificity {
|
} |
} |
&topic_bar($r,$img,$lt{'uprv'}); |
&topic_bar($r,$img,$lt{'uprv'}); |
if ((($action eq 'create') && (@{$available} > 0)) || |
if ((($action eq 'create') && (@{$available} > 0)) || |
(($action eq 'modify') && ($formname eq 'change_settings'))) { |
(($action eq 'modify') && ($formname eq 'change_settings'))) { |
my %specific = ( |
my %specific = ( |
'No' => 'checked="checked"', |
'No' => 'checked="checked"', |
'Yes' => '', |
'Yes' => '', |
Line 1882 sub privilege_specificity {
|
Line 1882 sub privilege_specificity {
|
} else { |
} else { |
if ($action eq 'create') { |
if ($action eq 'create') { |
$r->print($lt{'asyo'}); |
$r->print($lt{'asyo'}); |
|
$r->print('<input type="hidden" name="specificity" value="No" />'); |
} elsif ($action eq 'modify' && $formname eq 'pick_members') { |
} elsif ($action eq 'modify' && $formname eq 'pick_members') { |
my @defprivs; |
my @defprivs; |
if (ref($$stored{'defpriv'}) eq 'ARRAY') { |
if (ref($$stored{'defpriv'}) eq 'ARRAY') { |
Line 3320 sub add_group_folder {
|
Line 3321 sub add_group_folder {
|
my $grpfolder = &mt('[_1] Folder -',$ucgpterm,).$description; |
my $grpfolder = &mt('[_1] Folder -',$ucgpterm,).$description; |
$grppage='/adm/'.$cdom.'/'.$cnum.'/'.$groupname.'/smppg'; |
$grppage='/adm/'.$cdom.'/'.$cnum.'/'.$groupname.'/smppg'; |
my $grptitle = &mt('Group homepage').' - '.$description; |
my $grptitle = &mt('Group homepage').' - '.$description; |
my ($seqid,$discussions,$disctitle); |
my ($discussions,$disctitle); |
my $outcome = &map_updater($cdom,$cnum,'group_folder_'.$groupname.'.sequence', |
my $outcome = &map_updater($cdom,$cnum,'group_folder_'.$groupname.'.sequence', |
'grpseq',$grpfolder,$allgrpsmap,$grppage, |
'grpseq',$grpfolder,$allgrpsmap,$grppage, |
$grptitle); |
$grptitle); |
Line 3332 sub add_group_folder {
|
Line 3333 sub add_group_folder {
|
# Link to folder for bulletin boards |
# Link to folder for bulletin boards |
$grpmap = $crspath.'group_folder_'.$groupname.'.sequence'; |
$grpmap = $crspath.'group_folder_'.$groupname.'.sequence'; |
if (grep/^discussion$/,@{$tools}) { |
if (grep/^discussion$/,@{$tools}) { |
$seqid = $now + 1; |
|
$disctitle = &mt('Discussion Boards'); |
$disctitle = &mt('Discussion Boards'); |
my $outcome = &map_updater($cdom,$cnum,'group_boards_'.$groupname. |
my $outcome = &map_updater($cdom,$cnum,'group_boards_'.$groupname. |
'.sequence','bbseq',$disctitle,$grpmap); |
'.sequence','bbseq',$disctitle,$grpmap); |