version 1.39, 2001/08/07 12:14:42
|
version 1.40, 2001/08/07 12:24:53
|
Line 49 sub meta_parameter_write {
|
Line 49 sub meta_parameter_write {
|
my ($name,$type,$default,$display)=@_; |
my ($name,$type,$default,$display)=@_; |
return '<parameter part="'.$Apache::inputtags::part. |
return '<parameter part="'.$Apache::inputtags::part. |
'" name="'.$name. |
'" name="'.$name. |
'" type="'.$type. |
'" type="'.$type.'"'. |
'" default="'.$default. |
($default?' default="'.$default.'"':''). |
'" display="'.$display. |
($display?' display="'.$display.' [Part: '.$Apache::inputtags::part.']"':'') |
' [Part: '.$Apache::inputtags::part.']"></parameter>' |
.'></parameter>' |
."\n"; |
."\n"; |
} |
} |
|
|