version 1.253, 2014/06/12 12:08:02
|
version 1.254.2.1, 2024/02/28 16:10:27
|
Line 763 sub pageheader {
|
Line 763 sub pageheader {
|
sub handler { |
sub handler { |
my $r=shift; |
my $r=shift; |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
['currentpath','changecourse']); |
['currentpath','changecourse','modal']); |
my $uri=$r->uri; |
my $uri=$r->uri; |
# |
# |
# Set document type |
# Set document type |
Line 854 sub handler {
|
Line 854 sub handler {
|
'only_body' => 1,}) |
'only_body' => 1,}) |
.'<h1>'.&mt('Metadata').'</h1>' |
.'<h1>'.&mt('Metadata').'</h1>' |
); |
); |
|
if ($env{'form.modal'}) { |
|
my $width = 500; |
|
my $height = 400; |
|
my $machine = &Apache::lonnet::absolute_url(); |
|
$r->print(&Apache::loncommon::nicescroll_javascript('metadatawrapper', |
|
{cursorcolor => '#00F', |
|
railalign => 'right', |
|
railoffset => '{top:5,left:40}'}, |
|
undef,1,$machine.$uri)); |
|
$r->print('<div id="metadatawrapper" style="height:'.$height.'px; width:'.$width.'px; overflow: auto;">'); |
|
} |
&present_uneditable_metadata($r,$uri); |
&present_uneditable_metadata($r,$uri); |
|
if ($env{'form.modal'}) { |
|
$r->print('</div>'); |
|
} |
} |
} |
$r->print(&Apache::loncommon::end_page()); |
$r->print(&Apache::loncommon::end_page()); |
return OK; |
return OK; |
Line 1459 ENDEDIT
|
Line 1473 ENDEDIT
|
'lowestgradelevel','highestgradelevel','sourceavail','sourcerights', |
'lowestgradelevel','highestgradelevel','sourceavail','sourcerights', |
'obsolete','obsoletereplacement'); |
'obsolete','obsoletereplacement'); |
} |
} |
|
my (%domdefs,$got_domdefs); |
if (! $Apache::lonpublisher::metadatafields{'copyright'}) { |
if (! $Apache::lonpublisher::metadatafields{'copyright'}) { |
$Apache::lonpublisher::metadatafields{'copyright'}= |
my $copyright = 'default'; |
'default'; |
if ($env{'environment.copyright'} ne '') { |
|
$copyright = $env{'environment.copyright'}; |
|
} else { |
|
my $defdom = $env{'request.role.domain'}; |
|
if ($disuri =~ m{^/priv/($match_domain)/}) { |
|
$defdom = $1; |
|
} |
|
if ($defdom ne '') { |
|
%domdefs = &Apache::lonnet::get_domain_defaults($defdom); |
|
$got_domdefs = 1; |
|
if ($domdefs{'copyright'} ne '') { |
|
$copyright = $domdefs{'copyright'}; |
|
} |
|
} |
|
} |
|
$Apache::lonpublisher::metadatafields{'copyright'}= |
|
$copyright; |
|
} |
|
if (! $Apache::lonpublisher::metadatafields{'sourceavail'}) { |
|
my $sourceavail = 'closed'; |
|
if ($env{'environment.sourceavail'} ne '') { |
|
$sourceavail = $env{'environment.sourceavail'}; |
|
} else { |
|
my $defdom = $env{'request.role.domain'}; |
|
if ($disuri =~ m{^/priv/($match_domain)/}) { |
|
$defdom = $1; |
|
} |
|
if ($defdom ne '') { |
|
unless ($got_domdefs) { |
|
%domdefs = &Apache::lonnet::get_domain_defaults($defdom); |
|
$got_domdefs = 1; |
|
} |
|
if ($domdefs{'sourceavail'} ne '') { |
|
$sourceavail = $domdefs{'sourceavail'}; |
|
} |
|
} |
|
} |
|
$Apache::lonpublisher::metadatafields{'sourceavail'}= |
|
$sourceavail; |
} |
} |
if (($file_type eq 'portfolio') || ($file_type eq 'groups')) { |
if (($file_type eq 'portfolio') || ($file_type eq 'groups')) { |
if (! $Apache::lonpublisher::metadatafields{'mime'}) { |
if (! $Apache::lonpublisher::metadatafields{'mime'}) { |