Browse Source

* Subtitle::SSA::Record->new : fix parse()

master
Alex 'AdUser' Z 8 years ago
parent
commit
7a31bbc727
  1. 1
      lib/Subtitle/SSA/Record.pm

1
lib/Subtitle/SSA/Record.pm

@ -27,6 +27,7 @@ sub new {
}
my @fields = $self->fields();
$self->{_fieldcnt} = scalar @fields;
foreach my $field (@fields) {
$self->{$field} = ($opts{defaults})
? $FIELDS{$field}->{value}

Loading…
Cancel
Save