[LON-CAPA-cvs] cvs: loncom /interface lonnavmaps.pm
schulted
schulted@source.lon-capa.org
Sat, 14 Feb 2009 14:39:32 -0000
schulted Sat Feb 14 14:39:32 2009 EDT
Modified files:
/loncom/interface lonnavmaps.pm
Log:
Inserted a line to seperate the content from the action menu.
Index: loncom/interface/lonnavmaps.pm
diff -u loncom/interface/lonnavmaps.pm:1.424 loncom/interface/lonnavmaps.pm:1.425
--- loncom/interface/lonnavmaps.pm:1.424 Sat Feb 14 12:20:10 2009
+++ loncom/interface/lonnavmaps.pm Sat Feb 14 14:39:31 2009
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Navigate Maps Handler
#
-# $Id: lonnavmaps.pm,v 1.424 2009/02/14 12:20:10 schulted Exp $
+# $Id: lonnavmaps.pm,v 1.425 2009/02/14 14:39:31 schulted Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -1386,7 +1386,7 @@
my $printKey = $args->{'printKey'};
my $printCloseAll = $args->{'printCloseAll'};
if (!defined($printCloseAll)) { $printCloseAll = 1; }
-
+
# Print key?
if ($printKey) {
$result .= '<table border="0" cellpadding="2" cellspacing="0">';
@@ -1461,6 +1461,7 @@
$result.='</form>';
}
+
if ($args->{'caller'} eq 'navmapsdisplay') {
$result .= '<table><tr><td>'.
&Apache::loncommon::help_open_menu('Navigation Screen','Navigation_Screen',undef,'RAT').'</td>';
@@ -1484,14 +1485,17 @@
$result.=$args->{'sort_html'};
}
- $result .= "<br />\n";
+ #$result .= "<br />\n";
if ($r) {
$r->print($result);
$r->rflush();
$result = "";
}
# End parameter setting
-
+
+ $result .= "\n<table id=\"LC_nav_location\">\n<tbody>\n<tr>\n<td class=\"LC_current_location\"> </td>\n</tr>\n</tbody>\n</table>\n";
+ $result .= "<br />\n";
+
# Data
$result .= '<table cellspacing="0" cellpadding="3" border="0" bgcolor="#FFFFFF">' ."\n";
my $res = "Apache::lonnavmaps::resource";