sub is_paused { $_[0]->{xmms}->is_paused; }
sub is_playing { $_[0]->{xmms}->is_playing; }
sub pause { $_[0]->{xmms}->pause; }
sub play { $_[0]->{xmms}->play; }
sub stop { $_[0]->{xmms}->stop; }