| … | |
… | |
| 74 | |
74 | |
| 75 | if (defined $meta_json) { |
75 | if (defined $meta_json) { |
| 76 | my $meta = $self->{json_coder}->decode ($meta_json); |
76 | my $meta = $self->{json_coder}->decode ($meta_json); |
| 77 | $meta->{path} = $path; |
77 | $meta->{path} = $path; |
| 78 | $self->{music_meta}{$chksum} = $meta; |
78 | $self->{music_meta}{$chksum} = $meta; |
|
|
79 | &::audio_music_set ($self->{songs}); |
| 79 | } else { |
80 | } else { |
| 80 | ::message ({ markup => "starting to download song #$face/$pri, check your output-rate setting if your connection gets laggy." }); |
81 | ::message ({ markup => "starting to download song #$face/$pri, check your output-rate setting if your connection gets laggy." }); |
| 81 | $self->ask_face ($face, -100 - $pri, undef, sub { |
82 | $self->ask_face ($face, -100 - $pri, undef, sub { |
| 82 | my $len = length $_[1]; |
83 | my $len = length $_[1]; |
| 83 | my ($meta_json, $data) = unpack "(w/a*)*", $_[1]; |
84 | my ($meta_json, $data) = unpack "(w/a*)*", $_[1]; |
