Mercurial > pub > Impl
view Lib/Deployment/Batch/CustomAction.pm @ 156:8638dd1374bf
Added template property to IMPL::Web::QueryHandler::PageFormat (this allows to specify exact template (filename, ref to a scalar, ref to a file handle)).
author | wizard |
---|---|
date | Tue, 05 Oct 2010 17:20:51 +0400 |
parents | 16ada169ca75 |
children | 76515373dac0 |
line wrap: on
line source
use strict; package Deployment::Batch::CustomAction; use base qw(Deployment::Batch::Generic); use Common; BEGIN { DeclareProperty handlerRun => ACCESS_READ; DeclareProperty handlerRollback => ACCESS_READ; DeclareProperty Name => ACCESS_READ; } sub CTOR { my ($this,%args) = @_; $this->{$handlerRun} = $args{Run} || sub {}; $this->{$handlerRollback} = $args{Rollback} || sub {}; $this->{$Name} = $args{Name} || $this->SUPER::Name(); } sub Run { my ($this) = @_; $this->{$handlerRun}->($this); } sub Rollback { my ($this) = @_; $this->{$handlerRollback}->($this); } 1;