version 1.55, 2004/02/20 17:03:38
|
version 1.56, 2004/02/24 23:19:15
|
Line 676 sub Create_PrgWin {
|
Line 676 sub Create_PrgWin {
|
} |
} |
if (!$inputname) { |
if (!$inputname) { |
$prog_state{'inputname'}=&get_uniq_name(); |
$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.'" />'); |
'" size="'.$width.'" />'); |
} else { |
} else { |
$prog_state{'inputname'}=$inputname; |
$prog_state{'inputname'}=$inputname; |