[LON-CAPA-cvs] cvs: loncom /interface lonhtmlcommon.pm lonmenu.pm
droeschl
droeschl@source.lon-capa.org
Wed, 18 Nov 2009 11:47:33 -0000
droeschl Wed Nov 18 11:47:33 2009 EDT
Modified files:
/loncom/interface lonhtmlcommon.pm lonmenu.pm
Log:
Fixed an issue that caused tools to appear multiple times in construction space.
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.244 loncom/interface/lonhtmlcommon.pm:1.245
--- loncom/interface/lonhtmlcommon.pm:1.244 Wed Nov 18 11:18:23 2009
+++ loncom/interface/lonhtmlcommon.pm Wed Nov 18 11:47:32 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.244 2009/11/18 11:18:23 droeschl Exp $
+# $Id: lonhtmlcommon.pm,v 1.245 2009/11/18 11:47:32 droeschl Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1473,6 +1473,10 @@
push @{$tools{$category}}, $html;
}
+ sub clear_breadcrumb_tools {
+ undef(%tools);
+ }
+
sub add_tools {
my ($links) = @_;
return unless defined %tools;
Index: loncom/interface/lonmenu.pm
diff -u loncom/interface/lonmenu.pm:1.303 loncom/interface/lonmenu.pm:1.304
--- loncom/interface/lonmenu.pm:1.303 Wed Nov 18 11:18:23 2009
+++ loncom/interface/lonmenu.pm Wed Nov 18 11:47:33 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Routines to control the menu
#
-# $Id: lonmenu.pm,v 1.303 2009/11/18 11:18:23 droeschl Exp $
+# $Id: lonmenu.pm,v 1.304 2009/11/18 11:47:33 droeschl Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -832,6 +832,7 @@
if ($addremote) {
#SD START (work in progress!)
+ Apache::lonhtmlcommon::clear_breadcrumb_tools();
# Arrows for navigation
Apache::lonhtmlcommon::add_breadcrumb_tool( 'A', $inlineremote[21] );
Apache::lonhtmlcommon::add_breadcrumb_tool( 'A', $inlineremote[23] );