Files
netdisco/Netdisco/lib/Netdisco/Daemon/Actions/Util.pm
2012-12-09 15:17:25 +00:00

16 lines
290 B
Perl

package Netdisco::Daemon::Actions::Util;
# support utilities for Daemon Actions
use base 'Exporter';
our @EXPORT = ();
our @EXPORT_OK = qw/ done error /;
our %EXPORT_TAGS = (
all => [qw/ done error /],
);
sub done { return ('done', shift) }
sub error { return ('error', shift) }
1;