Util::CoreTags (version $)


package Util::CoreTags;
##############################################################################
#
# DESCRIPTION: This object defines core event tags.
#
# HISTORY
# HISTORY: $Log: CoreTags.pm,v $
# HISTORY: Revision 1.3  2014/02/27 07:01:06  apsop
# HISTORY: VERSION header now shows CVS Revision
# HISTORY:
# HISTORY: Revision 1.2  2006/08/01 20:35:34  apsop
# HISTORY: Add in CVS history indicator.
# HISTORY:
# HISTORY:
#
# VERSION: $Revision: 1.3 $
#
#
##############################################################################

use strict;

use base qw(Exporter);
use vars qw(@EXPORT);

@EXPORT = qw(
	UNKNOWN_ERROR TIMESTAMP TASK_ERROR
	BAD_TASK BAD_PARAMETER BAD_INPUT BAD_OUTPUT
	PIPE_FAILED EVAL_ERROR
	REMOVE_OVERLAP ASPECT_FAILED
	UNKNOWN_FILE
);


use constant UNKNOWN_ERROR       => 'core.unknown.error';
use constant TIMESTAMP           => 'core.timestamp';
use constant TASK_ERROR          => 'core.task.error';

use constant BAD_TASK            => 'core.bad.task';
use constant BAD_PARAMETER       => 'core.bad.parameter';
use constant BAD_INPUT           => 'core.bad.input';
use constant BAD_OUTPUT          => 'core.bad.output';

use constant PIPE_FAILED         => 'core.pipe.failed';
use constant EVAL_ERROR          => 'core.eval.error';

use constant REMOVE_OVERLAP      => 'core.remove.overlap';
use constant ASPECT_FAILED       => 'core.aspect.failed';

use constant UNKNOWN_FILE        => 'core.unknown.file';


1;