version 1.48, 2006/10/23 18:48:47
|
version 1.50, 2007/05/02 01:33:49
|
Line 150 sub handler {
|
Line 150 sub handler {
|
$r->print(&grouppage_breadcrumbs($dom,$crs,$group,$group_desc)); |
$r->print(&grouppage_breadcrumbs($dom,$crs,$group,$group_desc)); |
} |
} |
if ((!$group_home_edit) && (!$group_home_view) && |
if ((!$group_home_edit) && (!$group_home_view) && |
(!$group_view_perm) && (!$group_edit_perm)) { |
(!$group_view_perm) && (!$group_edit_perm)) { |
&display_group_links($r,$target,$group,'view',$refarg,%groupinfo); |
&display_group_links($r,$target,$group,'view',$refarg,%groupinfo); |
|
if ($env{'form.grade_target'} ne 'tex') { |
|
$r->print(&Apache::loncommon::end_page()); |
|
} else { |
|
$r->print('\end{document}'); |
|
} |
return OK; |
return OK; |
} |
} |
} else { |
} else { |
Line 165 sub handler {
|
Line 170 sub handler {
|
} |
} |
return OK; |
return OK; |
} |
} |
|
my ($blocked,$blocktext) = |
|
&Apache::loncommon::blocking_status('groups'); |
|
if ($blocked) { |
|
$r->print($blocktext); |
|
$r->print(&Apache::loncommon::end_page()); |
|
return OK; |
|
} |
} |
} |
|
|
my $allowed; |
my $allowed; |
Line 254 sub handler {
|
Line 266 sub handler {
|
'<form method="post" enctype="multipart/form-data">'. |
'<form method="post" enctype="multipart/form-data">'. |
'<input type="hidden" name="forceedit" value="edit" />'. |
'<input type="hidden" name="forceedit" value="edit" />'. |
'<h3>Upload a Photo</h3>'. |
'<h3>Upload a Photo</h3>'. |
'<input type="file" name="uploaddoc" size="50">'. |
'<input type="file" name="uploaddoc" size="50" />'. |
'<input type="submit" name="storeupl" value="Upload">'. |
'<input type="submit" name="storeupl" value="Upload" />'. |
'</form><form method="post">'); |
'</form><form method="post">'); |
} |
} |
foreach my $field (sort(keys(%syllabusfields))) { |
foreach my $field (sort(keys(%syllabusfields))) { |
Line 287 sub handler {
|
Line 299 sub handler {
|
$r->print( |
$r->print( |
'<br />Title<br /><textarea cols="80" rows="2" name="'.$field.'">'. |
'<br />Title<br /><textarea cols="80" rows="2" name="'.$field.'">'. |
&HTML::Entities::encode($syllabus{$field},'"&<>'). |
&HTML::Entities::encode($syllabus{$field},'"&<>'). |
'</textarea><input type="submit" name="storesyl" value="Store" />'); |
'</textarea><input type="submit" name="storesyl" value="Save" />'); |
} else { |
} else { |
my $safeinit; |
my $safeinit; |
$r->print(&Apache::lonxml::xmlparse($r,'tex',$syllabus{$field},$safeinit)); |
$r->print(&Apache::lonxml::xmlparse($r,'tex',$syllabus{$field},$safeinit)); |
Line 313 sub handler {
|
Line 325 sub handler {
|
if ($target ne 'tex') { |
if ($target ne 'tex') { |
$r->print('<br /><textarea cols="80" rows="24" name="'.$field.'" id="'.$field.'">'. |
$r->print('<br /><textarea cols="80" rows="24" name="'.$field.'" id="'.$field.'">'. |
&HTML::Entities::encode($syllabus{$field},'"&<>'). |
&HTML::Entities::encode($syllabus{$field},'"&<>'). |
'</textarea><input type="submit" name="storesyl" value="Store" />'); |
'</textarea><input type="submit" name="storesyl" value="Save" />'); |
} else { |
} else { |
my $safeinit; |
my $safeinit; |
$r->print(&Apache::lonxml::xmlparse($r,'tex',$syllabus{$field},$safeinit)); |
$r->print(&Apache::lonxml::xmlparse($r,'tex',$syllabus{$field},$safeinit)); |