version 1.235, 2009/05/28 17:08:32
|
version 1.237, 2009/12/01 18:07:50
|
Line 425 sub select_course {
|
Line 425 sub select_course {
|
# Pretty printing of metadata field |
# Pretty printing of metadata field |
|
|
sub prettyprint { |
sub prettyprint { |
my ($type,$value,$target,$prefix,$form,$noformat)=@_; |
my ($type,$value,$target,$prefix,$form)=@_; |
# $target,$prefix,$form are optional and for filecrumbs only |
# $target,$prefix,$form are optional and for filecrumbs only |
if (! defined($value)) { |
if (! defined($value)) { |
return ' '; |
return ' '; |
Line 500 sub prettyprint {
|
Line 500 sub prettyprint {
|
} |
} |
} |
} |
$_ = '<li>'.$title.' '. |
$_ = '<li>'.$title.' '. |
&Apache::lonhtmlcommon::crumbs($url,$target,$prefix,$form,'0',$noformat). |
&Apache::lonhtmlcommon::crumbs($url,$target,$prefix,$form). |
'</li>' |
'</li>' |
} split(/\s*\,\s*/,$value)).'</ul>'; |
} split(/\s*\,\s*/,$value)).'</ul>'; |
} |
} |
# Evaluations |
# Evaluations |
Line 744 sub prettyinput {
|
Line 744 sub prettyinput {
|
|
|
# Create pageheader |
# Create pageheader |
sub pageheader { |
sub pageheader { |
return &Apache::lonhtmlcommon::breadcrumbs() |
my $output = &Apache::lonhtmlcommon::breadcrumbs(); |
.&Apache::loncommon::head_subbox( |
|
&Apache::loncommon::CSTR_pageheader()); |
if ($env{'request.state'} eq 'construct') { |
|
$output .= &Apache::loncommon::head_subbox( |
|
&Apache::loncommon::CSTR_pageheader()); |
|
} |
|
return $output; |
} |
} |
|
|
# Main Handler |
# Main Handler |
Line 765 sub handler {
|
Line 769 sub handler {
|
|
|
# Breadcrumbs |
# Breadcrumbs |
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
&Apache::lonhtmlcommon::clear_breadcrumbs(); |
&Apache::lonhtmlcommon::add_breadcrumb({ |
|
'text' => 'Construction Space', |
if ($env{'request.state'} eq 'construct') { |
'href' => &Apache::loncommon::authorspace(), |
&Apache::lonhtmlcommon::add_breadcrumb({ |
}); |
'text' => 'Construction Space', |
|
'href' => &Apache::loncommon::authorspace(), |
|
}); |
|
} |
|
|
if ($uri=~m:/adm/bombs/(.*)$:) { |
if ($uri=~m:/adm/bombs/(.*)$:) { |
&Apache::lonhtmlcommon::add_breadcrumb({ |
&Apache::lonhtmlcommon::add_breadcrumb({ |
Line 922 sub present_uneditable_metadata {
|
Line 929 sub present_uneditable_metadata {
|
$versiondisplay='Version: '.$currentversion; |
$versiondisplay='Version: '.$currentversion; |
} |
} |
} |
} |
# crumbify displayed URL uri target prefix form size |
# crumbify displayed URL uri target prefix form |
$disuri=&Apache::lonhtmlcommon::crumbs($disuri,undef, undef, undef,'+1'); |
$disuri=&Apache::lonhtmlcommon::crumbs($disuri,undef, undef, undef); |
$disuri =~ s:<br />::g; |
|
# obsolete |
# obsolete |
my $obsolete=$content{'obsolete'}; |
my $obsolete=$content{'obsolete'}; |
my $obsoletewarning=''; |
my $obsoletewarning=''; |