view release on metacpan or  search on metacpan

Playlist.pm  view on Meta::CPAN

Play a specific object. 

=cut

sub playMedia() {
	my $self = shift;
	my $url  = shift;
	$self->run( "playMedia", "$url" );
}

=item popupMessage($msg)

Pops up $msg in screen.
TODO: $msg has to escape white spaces with '\'.
		e.g.   "Hi\\\ there";
		e.g2.	 'I\ am\ here'

=cut

sub popupMessage() {
	my $self = shift;
	my $msg  = shift;
	$self->run( "popupMessage", "$msg" );
}

=item removeCurrentTrack()

Removes current track from playlist

=cut

sub removeCurrentTrack() {
	my $self = shift;

t/1.t  view on Meta::CPAN

can_ok( $playlist, 'addMediaList' );
can_ok( $playlist, 'clearPlaylist' );
can_ok( $playlist, 'functions' );
can_ok( $playlist, 'getActiveIndex' );
can_ok( $playlist, 'getTotalTrackCount' );
can_ok( $playlist, 'interfaces' );
can_ok( $playlist, 'new' );
can_ok( $playlist, 'notStopAfterCurrent' );
can_ok( $playlist, 'playByIndex' );
can_ok( $playlist, 'playMedia' );
can_ok( $playlist, 'popupMessage' );
can_ok( $playlist, 'removeCurrentTrack' );
can_ok( $playlist, 'repopulate' );
can_ok( $playlist, 'saveCurrentPlaylist' );
can_ok( $playlist, 'saveM3uAbsolute' );
can_ok( $playlist, 'saveM3uRelative' );
can_ok( $playlist, 'setStopAfterCurrent' );
can_ok( $playlist, 'shortStatusMessage' );
can_ok( $playlist, 'shufflePlaylist' );
can_ok( $playlist, 'togglePlaylist' );