File Coverage

blib/lib/ProgressMonitor/SetMessageFlags.pm

Criterion	Covered	Total	%
statement	9	9	100.0
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	12	12	100.0

package ProgressMonitor::SetMessageFlags;

use strict;
use warnings;

# This defines the values used to indicate when SetMessage should occur
#

use Exporter qw(import);
our @EXPORT = qw(SM_NOW SM_PREPARE SM_BEGIN SM_TICK SM_END);

# This is the default - 'set the message now'
#
sub SM_NOW ()       { 0 }

# Set the message when prepare is called
#
sub SM_PREPARE () { 1 }

# Set the message when begin is called
#
sub SM_BEGIN ()    { 2 }

# Set the message when next tick is called
#
sub SM_TICK ()      { 3 }

# Set the message when end is called
#
sub SM_END ()      { 4 }

1;