Audio::Audiere::Error - error messages for Audio::Audiere

Audio-Audiere documentation Contained in the Audio-Audiere distribution.

Index

Code Index:

NAME

Top

Audio::Audiere::Error - error messages for Audio::Audiere

SYNOPSIS

Top

	use Audio::Audiere;

	my $au = Audio::Audiere->new();
	my $stream = $au->addStream('non-existant-stream.wav');

	if ($stream->error())
	  {
	  print "Fatal error: ", $stream->error(),"\n";
	  }

EXPORTS

Top

Exports nothing.

DESCRIPTION

Top

This package provides error messages for Audio::Audiere. When the creation of an Audio::Audiere or Audio::Audiere::Stream object fails, you will get an object of this class back, which only purpose is to store the error message.

The usage should be totally transparent to the user.

AUTHORS

Top

(c) 2004 Tels <http://bloodgate.com/>

SEE ALSO

Top

Audio::Audiere, http://audiere.sf.net/.

Audio-Audiere documentation Contained in the Audio-Audiere distribution. 
# Error class for Audio::Audiere

package Audio::Audiere::Error;

# (C) by Tels <http://bloodgate.com/>

use strict;

require Exporter;

use vars qw/@ISA $VERSION/;
@ISA = qw/Exporter/;

$VERSION = '0.01';

##############################################################################

sub new
  {
  # create a new error message
  my $class = shift;

  my $error = shift;
  
  bless \$error, $class;
  }

sub error
  {
  my $self = shift;
  $$self;
  }

1; # eof

__END__