From edccf69142414103a06e14688028a14978505b29 Mon Sep 17 00:00:00 2001 From: Ian Beckwith Date: Thu, 23 Sep 2010 21:49:36 +0100 Subject: [PATCH] fix artist + album --- lib/ID3FS/DB.pm | 10 ++++------ lib/ID3FS/PathElement/Album.pm | 4 ++++ 2 files changed, 8 insertions(+), 6 deletions(-) diff --git a/lib/ID3FS/DB.pm b/lib/ID3FS/DB.pm index 784abb9..5264826 100644 --- a/lib/ID3FS/DB.pm +++ b/lib/ID3FS/DB.pm @@ -266,15 +266,15 @@ sub artist_tracks sub album_tracks { my($self, $album_id)=@_; - my $sql=("SELECT files.name FROM albums\n\t" . + my $sql=("SELECT files.name FROM files\n\t" . "INNER JOIN files_x_albums ON albums.id=files_x_albums.albums_id\n\t" . "INNER JOIN albums ON albums.id=files_x_albums.albums_id\n\t" . "WHERE albums.id=?\n\t" . "GROUP BY files.name\n"); - print "ALBUM_TRACKS SQL: $sql\n"; + print "ALBUM_TRACKS SQL($album_id): $sql\n"; my $result=$self->cmd_rows($sql, $album_id); my @names=map { $_->[0]; } @$result; - @names = map { s/.*\///; } @names; + @names = map { s/.*\///; $_;} @names; print "TRACKS: ", join(', ', @names), "\n"; return(@names); } @@ -289,9 +289,7 @@ sub tracks } elsif(ref($constraints[$#constraints]) eq "ID3FS::PathElement::Album") { - # FIXME - return(()); -# return $self->album_tracks($constraints[$#constraints]->{id}); + return $self->album_tracks($constraints[$#constraints]->{id}); } my $main_sql_start=("SELECT files.name\n" . diff --git a/lib/ID3FS/PathElement/Album.pm b/lib/ID3FS/PathElement/Album.pm index d06c458..7543d5b 100644 --- a/lib/ID3FS/PathElement/Album.pm +++ b/lib/ID3FS/PathElement/Album.pm @@ -10,7 +10,11 @@ sub new my $self={}; bless($self,$class); + $self->{db}=shift; $self->{name}=shift; + $self->{id}=($self->{db}->id("albums", $self->{name})); + return(undef) unless(defined($self->{id})); + print "Artist ID: $self->{id}\n"; return $self; } -- 2.11.0