From 73c8f073cb5e6e483718e648a2ed59622683e7f2 Mon Sep 17 00:00:00 2001 From: Alex 'AdUser' Z Date: Tue, 12 May 2015 15:42:23 +1000 Subject: [PATCH] = fix save() --- lib/Text/Playlist.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/Text/Playlist.pm b/lib/Text/Playlist.pm index 05a5193..5200862 100644 --- a/lib/Text/Playlist.pm +++ b/lib/Text/Playlist.pm @@ -26,10 +26,10 @@ sub load { } sub save { - my ($self, $file) = @_; + my ($self, $file, @items) = @_; open(my $FH, ">", $file) or die $!; - print $FH $self->dump(); + print $FH $self->dump(@items); close($FH); return 1;