package Catalyst::Plugin::AfterFinalize;

use warnings;
use strict;
use base qw/Class::Accessor::Fast/;

our $VERSION = '0.0.1';

__PACKAGE__->mk_accessors(qw/after_finalize/);

sub finalize {
    my $c = shift;
    
    my $status = $c->NEXT::finalize(@_);
    
    if(ref $c->after_finalize eq 'CODE') {
        $c->after_finalize->($c);
    }
    
    return $status;
}

1;