From 1287481b723bb3dc6e9cfe75007b6c5c567cb675 Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 9 Feb 2012 10:09:57 +0000 Subject: [PATCH] spam settings, RT#15987 --- FS/FS/svc_Common.pm | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) diff --git a/FS/FS/svc_Common.pm b/FS/FS/svc_Common.pm index 499afe0fd..ff00ce028 100644 --- a/FS/FS/svc_Common.pm +++ b/FS/FS/svc_Common.pm @@ -1021,6 +1021,24 @@ sub export_getstatus { ( $html, \%hash ); } +=item export_setstatus + +Runs export_setstatus callbacks. If there is an error, returns the error, +otherwise returns false. + +=cut + +sub export_setstatus { + my( $self, @args ) = @_; + my $error = $self->export('setstatus', @args); + if ( $error ) { + warn "error running export_setstatus: $error"; + return $error; + } + ''; +} + + =item export HOOK [ EXPORT_ARGS ] Runs the provided export hook (i.e. "suspend", "unsuspend") for this service. -- 2.20.1