--- loncom/publisher/lonpubdir.pm 2011/12/23 17:21:18 1.140
+++ loncom/publisher/lonpubdir.pm 2012/04/24 10:29:53 1.142
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Construction Space Directory Lister
#
-# $Id: lonpubdir.pm,v 1.140 2011/12/23 17:21:18 www Exp $
+# $Id: lonpubdir.pm,v 1.142 2012/04/24 10:29:53 bisitz Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -524,7 +524,7 @@ sub putresource {
my $css_class='LC_browser_file';
my $title=' ';
my $publish_button=&mt('Publish');
- my $cstr_dir = $r->dir_config('lonDocRoot').'/priv/'.$udom.'/'.$uname.'/'.$thisdisfn.'/';
+ my $cstr_dir = $r->dir_config('lonDocRoot').'/priv'.$thisdisfn;
my $linkfilename=&HTML::Entities::encode('/priv'.$thisdisfn.'/'.$filename,'<>&"');
if (-e $resdir.'/'.$filename) {
@@ -598,7 +598,7 @@ sub putresource {
$title = &mt('Metadata Modified').'
'.$title.
'
'.
&Apache::loncommon::modal_link(
- '/adm/diff?filename=/priv/'.$linkfilename.'.meta'.'&versiontwo=priv',
+ '/adm/diff?filename='.$linkfilename.'.meta'.'&versiontwo=priv',
&mt('Metadata Diffs'),600,500);
$title.="\n".'
'.
&Apache::loncommon::modal_link(
@@ -608,6 +608,9 @@ sub putresource {
$status.="\n".'
'.
&Apache::loncommon::modal_link(
'/adm/retrieve?filename='.$linkfilename.'&inhibitmenu=yes&add_modal=yes',&mt('Retrieve'),600,500);
+ } else {
+ # Allow editing metadata of unpublished resources
+ $title .= ''.&mt('Edit Metadata').'';
}
my $editlink='';
my $editlink2='';