version 1.442, 2013/01/04 05:30:52
|
version 1.443, 2013/05/05 00:10:16
|
Line 633 sub edit_controls {
|
Line 633 sub edit_controls {
|
if (($env{'request.course.id'}) && ($env{'form.forceedit'})) { |
if (($env{'request.course.id'}) && ($env{'form.forceedit'})) { |
my $url=&Apache::lonnet::hreflocation('',$env{'request.filename'}); |
my $url=&Apache::lonnet::hreflocation('',$env{'request.filename'}); |
if ($url =~ /\.html?$/i) { |
if ($url =~ /\.html?$/i) { |
|
my ($cdom,$cnum); |
if ($env{'request.course.id'}) { |
if ($env{'request.course.id'}) { |
|
$cdom = $env{'course.'.$env{'request.course.id'}.'.domain'}; |
|
$cnum = $env{'course.'.$env{'request.course.id'}.'.num'}; |
if ($env{'request.filename'} =~ m{/userfiles/supplemental/default|\d+/}) { |
if ($env{'request.filename'} =~ m{/userfiles/supplemental/default|\d+/}) { |
if (&Apache::lonnet::is_course_upload($env{'request.filename'}, |
if (&Apache::lonnet::is_course_upload($env{'request.filename'}, |
$env{'course.'.$env{'request.course.id'}.'.num'}, |
$cnum,$cdom)) { |
$env{'course.'.$env{'request.course.id'}.'.domain'})) { |
|
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
&Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'}, |
['folderpath','title']); |
['folderpath','title']); |
} |
} |
} |
} |
} |
} |
my ($symb,$itemtitle,$displayfile) = |
my ($symb,$itemtitle,$displayfile,$caller); |
&Apache::lonxml::get_courseupload_hierarchy($url, |
if ($url =~ m{^/uploaded/$cdom/$cnum/portfolio/syllabus/}) { |
$env{'form.folderpath'}, |
$itemtitle = &mt('Syllabus'); |
$env{'form.title'}); |
$caller = "/public/$cdom/$cnum/syllabus"; |
if (($symb ne '') || ($env{'httpref.'.$url} ne '')) { |
} else { |
|
$caller = $url; |
|
($symb,$itemtitle,$displayfile) = |
|
&Apache::lonxml::get_courseupload_hierarchy($url, |
|
$env{'form.folderpath'}, |
|
$env{'form.title'}); |
|
} |
|
if (($symb ne '') || ($env{'httpref.'.$url} ne '') || |
|
($url =~ m{^/uploaded/$cdom/$cnum/portfolio/syllabus/})) { |
$result .= (' ' x 3). |
$result .= (' ' x 3). |
&Apache::lonhtmlcommon::dependencies_button()."\n". |
&Apache::lonhtmlcommon::dependencies_button()."\n". |
&Apache::lonhtmlcommon::dependencycheck_js($symb, |
&Apache::lonhtmlcommon::dependencycheck_js($symb, |
$itemtitle,$url,$env{'form.folderpath'},$url)."\n"; |
$itemtitle,$url,$env{'form.folderpath'},$caller)."\n"; |
} |
} |
} |
} |
} |
} |