You should create PRE modify_success plugin. Have a look at the code below:

sub modify_success {
#----------------------------------------------------------------------
my ($home, $id) = @_;

my $hsh;
if ( $home->{db}->ai ) {
$hsh = $home->{db}->get ($id, 'HASH');
}
else {
my $lookup = {};
my $pk = $home->{db}->pk;
foreach (@$pk) { $lookup->{$_} = $home->{cgi}->{$_}; }
$hsh = $home->{db}->get ($lookup, 'HASH');
}

# Add your code right here

return ('modify_success.html', {
header => $home->_language('HEA_MODED'),
msg => $home->_language('MOD_SUCCESSFULLY'),
values => $hsh,
($hsh) ? %$hsh : hsh => 1
});
}


Hope that helps.

TheStone.

B.