view release on metacpan or  search on metacpan

lib/Audio/Nama/EngineSetup.pm  view on Meta::CPAN

# ----------- Engine Setup and Teardown -----------

package Audio::Nama;
use v5.36; use Carp;

sub reconfigure_engine {

	logsub((caller(0))[3]);

	# skip if command line option is set
	
	return if $config->{opts}->{R};
	refresh_wav_cache();
	update_jack_client_list();
	refresh_tempo_map() if $config->{use_metronome};
	project_snapshot();
	Audio::Nama::Engine::sync_action('configure');
}

sub request_setup { 
	my ($package, $filename, $line) = caller();
    logpkg(__FILE__,__LINE__,'debug',"reconfigure requested in file $filename:$line");
	$setup->{changed}++
} 

sub generate_setup {Audio::Nama::Engine::sync_action('setup') }

sub start_transport { 
	logsub((caller(0))[3]);
	Audio::Nama::Engine::sync_action('start');

}

sub stop_transport { 

	logsub((caller(0))[3]); 
	Audio::Nama::Engine::sync_action('stop');
}
	
1;
__END__