Browse Source

= fix save()

master
Alex 'AdUser' Z 10 years ago
parent
commit
73c8f073cb
  1. 4
      lib/Text/Playlist.pm

4
lib/Text/Playlist.pm

@ -26,10 +26,10 @@ sub load {
} }
sub save { sub save {
my ($self, $file) = @_; my ($self, $file, @items) = @_;
open(my $FH, ">", $file) or die $!; open(my $FH, ">", $file) or die $!;
print $FH $self->dump(); print $FH $self->dump(@items);
close($FH); close($FH);
return 1; return 1;

Loading…
Cancel
Save