CatalystX-CMS
view release on metacpan or search on metacpan
lib/CatalystX/CMS/File.pm view on Meta::CPAN
293294295296297298299300301302303304305306307308309310311312=head2 update
Calls write().
B<NOTE:> This is not the same as the SVN::Class->update method!
If you want that method, use the up() alias instead.
=cut
sub
update {
my
$self
=
shift
;
if
( !-s
$self
) {
croak
"cannot update an empty file"
;
}
$self
->
write
(
@_
);
}
sub
_ttify_attrs {
my
$self
=
shift
;
lib/CatalystX/CMS/Page.pm view on Meta::CPAN
666768697071727374757677787980818283848586=cut
sub read { shift->{delegate}->read(@_) }
=head2 update
Calls update() on the delegate(), passing all params.
=cut
sub
update {
shift
->{delegate}->update(
@_
) }
=head2 delete
Calls delete() on the delegate(), passing all params.
=cut
sub
delete
{
shift
->{delegate}->
delete
(
@_
) }
=head2 url
( run in 0.526 second using v1.01-cache-2.11-cpan-9b1e4054eb1 )