my %defaults = ();
my $error = $self->export('getsettings', \%settings, \%defaults);
if ( $error ) {
- #XXX bubble this up better
warn "error running export_getsetings: $error";
- return ( {}, {} );
+ return ( { 'error' => $error }, {} );
}
( \%settings, \%defaults );
}
my %hash = ();
my $error = $self->export('getstatus', \$html, \%hash);
if ( $error ) {
- #XXX bubble this up better
warn "error running export_getstatus: $error";
- return ( '', {} );
+ return ( '', { 'error' => $error } );
}
( $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.