--- loncom/homework/edit.pm 2002/03/08 18:30:33 1.30
+++ loncom/homework/edit.pm 2002/03/22 14:45:11 1.31
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# edit mode helpers
#
-# $Id: edit.pm,v 1.30 2002/03/08 18:30:33 matthew Exp $
+# $Id: edit.pm,v 1.31 2002/03/22 14:45:11 matthew Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -301,6 +301,17 @@ sub textarea_sizes {
return ($rows,$cols);
}
+sub textfield {
+ my ($tag,$data,$description,$size)=@_;
+ if ($description) { $description=" ".$description." "; }
+ my $result = <<"END";
+$description
+
+END
+ return $result;
+}
+
sub editfield {
my ($tag,$data,$description,$minwidth,$minheight)=@_;
@@ -552,6 +563,11 @@ search($elementname) : provide a link wh
searcher (lonsearchcat) and, once a file is selected, place the result in
the form element $elementname.
+= item *
+textfield(tag,data,description,size): Provide a for
+single-line text entry. This is to be used for text enclosed by tags, not
+arguements/parameters associated with a tag.
+
=back
incomplete...