[LON-CAPA-cvs] cvs: loncom /interface lonhtmlcommon.pm

[albertel]

albertel		Tue Feb 24 18:19:16 2004 EDT

  Modified files:              
    /loncom/interface	lonhtmlcommon.pm 
  Log:
  - put heading inline with input element in inline mode
  
  
Index: loncom/interface/lonhtmlcommon.pm
diff -u loncom/interface/lonhtmlcommon.pm:1.55 loncom/interface/lonhtmlcommon.pm:1.56
--- loncom/interface/lonhtmlcommon.pm:1.55	Fri Feb 20 12:03:38 2004
+++ loncom/interface/lonhtmlcommon.pm	Tue Feb 24 18:19:15 2004
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common html routines
 #
-# $Id: lonhtmlcommon.pm,v 1.55 2004/02/20 17:03:38 matthew Exp $
+# $Id: lonhtmlcommon.pm,v 1.56 2004/02/24 23:19:15 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -676,7 +676,7 @@
 	}
 	if (!$inputname) {
 	    $prog_state{'inputname'}=&get_uniq_name();
-	    &r_print($r,'<input type="text" name="'.$prog_state{'inputname'}.
+	    &r_print($r,$heading.' <input type="text" name="'.$prog_state{'inputname'}.
 		     '" size="'.$width.'" />');
 	} else {
 	    $prog_state{'inputname'}=$inputname;