--- loncom/interface/loncommon.pm 2002/04/23 21:42:01 1.35
+++ loncom/interface/loncommon.pm 2002/06/24 19:06:05 1.38
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# a pile of common routines
#
-# $Id: loncommon.pm,v 1.35 2002/04/23 21:42:01 matthew Exp $
+# $Id: loncommon.pm,v 1.38 2002/06/24 19:06:05 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -65,7 +65,7 @@ Current things done:
This is part of the LearningOnline Network with CAPA project
described at http://www.lon-capa.org.
-=head2 Subroutines
+=head2 General Subroutines
=over 4
@@ -79,7 +79,6 @@ use Apache::lonnet();
use POSIX qw(strftime);
use Apache::Constants qw(:common);
use Apache::lonmsg();
-
my $readit;
# ----------------------------------------------- Filetypes/Languages/Copyright
@@ -99,6 +98,9 @@ my $thethreshold=0.1/$thefuzzy;
my $theavecount;
# ----------------------------------------------------------------------- BEGIN
+
+=pod
+
=item BEGIN()
Initialize values from language.tab, copyright.tab, filetypes.tab,
@@ -188,6 +190,171 @@ BEGIN {
}
# ============================================================= END BEGIN BLOCK
+
+=item linked_select_forms(...)
+
+linked_select_forms returns a string containing a block
+and html for two