--- loncom/interface/loncommon.pm 2009/02/02 17:21:16 1.740 +++ loncom/interface/loncommon.pm 2009/02/13 17:26:55 1.746 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.740 2009/02/02 17:21:16 bisitz Exp $ +# $Id: loncommon.pm,v 1.746 2009/02/13 17:26:55 neumanie Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1746,7 +1746,7 @@ sub select_level_form { =pod -=item * &select_dom_form($defdom,$name,$includeempty,$showdomdesc) +=item * &select_dom_form($defdom,$name,$includeempty,$showdomdesc,$autosubmit) Returns a string containing a \n"; + my $selectdomain = "