|
version 1.10, 2006/11/02 21:06:06
|
version 1.11, 2007/05/02 01:33:48
|
|
Line 207 sub create_board {
|
Line 207 sub create_board {
|
| my $putresult = &Apache::lonnet::put('nohist_groupboards',\%new_board, |
my $putresult = &Apache::lonnet::put('nohist_groupboards',\%new_board, |
| $cdom,$cnum); |
$cdom,$cnum); |
| if ($putresult ne 'ok') { |
if ($putresult ne 'ok') { |
| $outcome = 'error storing new board: '.$putresult; |
$outcome = 'error saving new board: '.$putresult; |
| } else { |
} else { |
| $newurl = '/adm/'.$cdom.'/'.$cnum.'/'.$boardid. |
$newurl = '/adm/'.$cdom.'/'.$cnum.'/'.$boardid. |
| '/bulletinboard'; |
'/bulletinboard'; |
|
Line 238 sub create_board {
|
Line 238 sub create_board {
|
| push(@LONCAPA::map::order,$newidx); |
push(@LONCAPA::map::order,$newidx); |
| my ($errtext,$fatal)=&LONCAPA::map::storemap($allbbsmap,1); |
my ($errtext,$fatal)=&LONCAPA::map::storemap($allbbsmap,1); |
| if ($fatal) { |
if ($fatal) { |
| $outcome = "error: failed to store discussion boards map - $errtext\n"; |
$outcome = "error: failed to save discussion boards map - $errtext\n"; |
| } else { |
} else { |
| my %boardinfo = ( |
my %boardinfo = ( |
| 'group' => $group, |
'group' => $group, |
![[BACK]](/icons/back.gif){kind=icon}
Return to groupboards.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface