summaryrefslogtreecommitdiff
path: root/lib/Ultramarine/Model/MusicFile.pm6
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Ultramarine/Model/MusicFile.pm6')
-rw-r--r--lib/Ultramarine/Model/MusicFile.pm63
1 files changed, 2 insertions, 1 deletions
diff --git a/lib/Ultramarine/Model/MusicFile.pm6 b/lib/Ultramarine/Model/MusicFile.pm6
index 0370310..7c3ccd1 100644
--- a/lib/Ultramarine/Model/MusicFile.pm6
+++ b/lib/Ultramarine/Model/MusicFile.pm6
@@ -3,9 +3,10 @@ use JSON::Fast;
class Ultramarine::Model::MusicFile {
has $.path is required;
+ submethod BUILD(IO() :$!path!) {}
method metadata() {
- my $proc = run 'avprobe', '-show_format','-of', 'json', $.path,
+ my $proc = run 'avprobe', '-show_format','-of', 'json', $.path.absolute,
:err,:out;
CATCH { when X::Proc::Unsuccessful { return %() } }
my $json-str = $proc.out.slurp(:close);