#!/usr/bin/perl -w
use strict;
use Test::More tests => 11;
use Audio::LADSPA;
use strict;
require "t/util.pl";
SKIP: {
skip("No SDK installed",11) unless sdk_installed();
my $plug = Audio::LADSPA->plugin( id => 1043);
ok($plug->isa("Audio::LADSPA::Plugin"),"loaded delay_5s/1043");
is($plug->id,"1043","id");
is($plug->label,"delay_5s","label");
is($plug->copyright,"None","copyright");
ok(!$plug->is_realtime,"is_realtime");
ok($plug->has_run,"has_run");
ok(!$plug->has_run_adding,"has_run_adding");
ok($plug->has_activate,"has_activate");
ok(!$plug->has_deactivate,"has_deactivate");
is ($plug->default('Dry/Wet Balance'),'middle',"default");
is ($plug->default_value('Dry/Wet Balance'),0.5,"default_value");
}