--- rat/lonsequence.pm 2002/08/12 18:21:42 1.13
+++ rat/lonsequence.pm 2002/08/31 00:43:13 1.14
@@ -2,7 +2,7 @@
#
# Sequence Handler
#
-# $Id: lonsequence.pm,v 1.13 2002/08/12 18:21:42 albertel Exp $
+# $Id: lonsequence.pm,v 1.14 2002/08/31 00:43:13 www Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -45,6 +45,7 @@ use GDBM_File;
use Apache::lonratedt;
use Apache::lonratsrv;
use Apache::lonpageflip;
+use Apache::loncommon;
my %selhash;
my $successtied;
@@ -89,7 +90,7 @@ function queue(val) {
ENDSCRIPT
}
- $r->print('');
+ $r->print(&Apache::loncommon::bodytag('Map Contents').''.$url.'
');
# ------------------ This is trying to select. Provide buttons and tie %selhash
if ($ENV{'form.forceselect'}) { $r->print(<