--- loncom/xml/londefdef.pm 2012/03/01 21:13:36 1.438
+++ loncom/xml/londefdef.pm 2012/07/06 22:46:12 1.440
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Tags Default Definition Module
#
-# $Id: londefdef.pm,v 1.438 2012/03/01 21:13:36 droeschl Exp $
+# $Id: londefdef.pm,v 1.440 2012/07/06 22:46:12 raeburn Exp $
#
#
# Copyright Michigan State University Board of Trustees
@@ -631,6 +631,16 @@ sub edit_controls {
$result .= '
';
if (($env{'request.course.id'}) && ($env{'form.forceedit'})) {
+ my $url=&Apache::lonnet::hreflocation('',$env{'request.filename'});
+ if ($url =~ /\.html?$/i) {
+ my ($symb,$itemtitle,$displayfile) =
+ &Apache::lonxml::get_courseupload_hierarchy($url);
+ if (($symb ne '') || ($env{'httpref.'.$url} ne '')) {
+ $result .= (' ' x 3).
+ &Apache::lonhtmlcommon::dependencies_button()."\n".
+ &Apache::lonhtmlcommon::dependencycheck_js($symb,$itemtitle,$url)."\n";
+ }
+ }
my $viewtext = &mt('Course View');
if (&Apache::loncommon::course_type() eq 'Community') {
$viewtext = &mt('Community View');