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 {
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;

Loading…
Cancel
Save