version 1.212, 2006/09/13 21:43:26
|
version 1.214, 2006/09/27 21:04:13
|
Line 846 sub store_metadata {
|
Line 846 sub store_metadata {
|
$status=&LONCAPA::lonmetadata::delete_metadata($dbh,undef, |
$status=&LONCAPA::lonmetadata::delete_metadata($dbh,undef, |
$metadata{'url'}); |
$metadata{'url'}); |
} else { |
} else { |
$status = &LONCAPA::lonmetadata::update_metadata($dbh,undef, |
$status = &LONCAPA::lonmetadata::update_metadata($dbh,undef,undef, |
\%metadata); |
\%metadata); |
} |
} |
if (defined($status) && $status ne '') { |
if (defined($status) && $status ne '') { |
Line 856 sub store_metadata {
|
Line 856 sub store_metadata {
|
&Apache::lonnet::logthis($status); |
&Apache::lonnet::logthis($status); |
return ($error,undef); |
return ($error,undef); |
} |
} |
return (undef,$status); |
return (undef,'success'); |
} |
} |
|
|
|
|
Line 1470 sub phasetwo {
|
Line 1470 sub phasetwo {
|
$metadatafields{'modifyinguser'}=$env{'user.name'}.':'. |
$metadatafields{'modifyinguser'}=$env{'user.name'}.':'. |
$env{'user.domain'}; |
$env{'user.domain'}; |
$metadatafields{'authorspace'}=$cuname.':'.$cudom; |
$metadatafields{'authorspace'}=$cuname.':'.$cudom; |
|
$metadatafields{'domain'}=$cudom; |
|
|
my $allkeywords=$env{'form.addkey'}; |
my $allkeywords=$env{'form.addkey'}; |
if (exists($env{'form.keywords'})) { |
if (exists($env{'form.keywords'})) { |
Line 1823 sub publishdirectory {
|
Line 1824 sub publishdirectory {
|
my $meta_cmtime = (stat($fn.'/'.$filename.'.meta'))[9]; |
my $meta_cmtime = (stat($fn.'/'.$filename.'.meta'))[9]; |
my $meta_rmtime = (stat($resdir.'/'.$filename.'.meta'))[9]; |
my $meta_rmtime = (stat($resdir.'/'.$filename.'.meta'))[9]; |
if ( $meta_rmtime<$meta_cmtime ) { |
if ( $meta_rmtime<$meta_cmtime ) { |
&Apache::lonnet::logthis("meta change!"); |
|
$publishthis=1; |
$publishthis=1; |
} |
} |
} else { |
} else { |