--- loncom/interface/lonhtmlcommon.pm 2002/08/21 17:18:08 1.8
+++ loncom/interface/lonhtmlcommon.pm 2002/08/30 15:35:08 1.9
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common html routines
#
-# $Id: lonhtmlcommon.pm,v 1.8 2002/08/21 17:18:08 www Exp $
+# $Id: lonhtmlcommon.pm,v 1.9 2002/08/30 15:35:08 stredwic Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -82,6 +82,76 @@ sub MapOptions {
$Str .= ''."\n";
+ return $Str;
+}
+
+sub ProblemOptions {
+ my ($data, $page, $map, $formName)=@_;
+ my $Str = '';
+ $Str .= '