100 |
</tr> |
</tr> |
101 |
| if $self->_layout eq 'table'; |
| if $self->_layout eq 'table'; |
102 |
return qq| |
return qq| |
103 |
|
<td class="field"> |
104 |
|
<input type=text id="$field_name" name="$field_name" value="$val"> |
105 |
|
</td> |
106 |
|
| if $self->_layout eq 'columns'; |
107 |
|
return qq| |
108 |
<div class=fieldholder> |
<div class=fieldholder> |
109 |
<label for="$field_name">$label</label> |
<label for="$field_name">$label</label> |
110 |
<div class=field> |
<div class=field> |
113 |
</div> |
</div> |
114 |
|; |
|; |
115 |
}); |
}); |
116 |
|
|
117 |
|
return qq|<tr class="editform">$out<td>| . $self->render_buttons . qq|</td></tr>| if $self->_layout eq 'columns'; |
118 |
|
|
119 |
$self->render_wrapper_class( $out, 'editform' ); |
$self->render_wrapper_class( $out, 'editform' ); |
120 |
} |
} |
121 |
|
|
127 |
my ( $name, $field_name, $label, $val ) = @_; |
my ( $name, $field_name, $label, $val ) = @_; |
128 |
return if $name =~ /^_/; |
return if $name =~ /^_/; |
129 |
return qq|<tr><td>$label</td><td>$val</td></tr>| if $self->_layout eq 'table'; |
return qq|<tr><td>$label</td><td>$val</td></tr>| if $self->_layout eq 'table'; |
130 |
|
return qq|<td>$val</td>| if $self->_layout eq 'columns'; |
131 |
return qq| |
return qq| |
132 |
<div class=fieldholder> |
<div class=fieldholder> |
133 |
<div class=label>$label</div> |
<div class=label>$label</div> |
136 |
</div> |
</div> |
137 |
|; |
|; |
138 |
}); |
}); |
139 |
|
return qq|<tr>$out<td>| . $self->render_buttons . qq|</td></tr>| if $self->_layout eq 'columns'; |
140 |
$self->render_wrapper_class( $out, 'view' ); |
$self->render_wrapper_class( $out, 'view' ); |
141 |
} |
} |
142 |
|
|
178 |
|
|
179 |
use Moose::Util::TypeConstraints; |
use Moose::Util::TypeConstraints; |
180 |
|
|
181 |
enum 'Layouts' => qw( div table ); |
enum 'Layouts' => qw( div table columns ); |
182 |
|
|
183 |
has _layout => ( |
has _layout => ( |
184 |
is => 'rw', |
is => 'rw', |