From eb4ff7f73c5d4bdf74a3472448b5a195598ff4cd Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 1 Aug 2007 22:26:52 +0000 Subject: event refactor, landing on HEAD! --- FS/FS/svc_domain.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'FS/FS/svc_domain.pm') diff --git a/FS/FS/svc_domain.pm b/FS/FS/svc_domain.pm index 5291271..803ebef 100644 --- a/FS/FS/svc_domain.pm +++ b/FS/FS/svc_domain.pm @@ -271,7 +271,7 @@ sub delete { } } - my $error = $self->SUPER::delete; + my $error = $self->SUPER::delete(@_); if ( $error ) { $dbh->rollback if $oldAutoCommit; return $error; @@ -298,7 +298,7 @@ sub replace { # Better to do it here than to force the caller to remember that svc_domain is weird. $new->setfield(action => 'M'); - my $error = $new->SUPER::replace($old); + my $error = $new->SUPER::replace($old, @_); return $error if $error; } -- cgit v1.1