X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=lib%2FID3FS%2FAudioFile.pm;fp=lib%2FID3FS%2FAudioFile.pm;h=75df24498b303c64e582a15b0adb75bd3abd760f;hb=261cfc3301a9908e34ef38f3f0792b08a4412ff7;hp=6fe5fa6846fc0623cfc1e4ef96fa29197e5fd908;hpb=f81050374f8c7aa1fa368de2dbdea2db3631188b;p=id3fs.git

diff --git a/lib/ID3FS/AudioFile.pm b/lib/ID3FS/AudioFile.pm
index 6fe5fa6..75df244 100644
--- a/lib/ID3FS/AudioFile.pm
+++ b/lib/ID3FS/AudioFile.pm
@@ -29,26 +29,26 @@ sub new
     my $self={};
     bless($self,$class);
 
-    my $path=shift;
-    my $ext=($path=~/.*\.(.*)/)[0];
+    $self->{path}=shift;
+    my $ext=($self->{path}=~/.*\.(.*)/)[0];
     return undef unless($ext);
     my $me=shift;
     $ext=lc($ext);
     if($ext eq "mp3")
     {
-	$self->{audiofile}=ID3FS::AudioFile::Mp3->new($path);
+	$self->{audiofile}=ID3FS::AudioFile::Mp3->new($self->{path});
     }
     elsif($ext eq "ogg")
     {
-	$self->{audiofile}=ID3FS::AudioFile::Ogg->new($path);
+	$self->{audiofile}=ID3FS::AudioFile::Ogg->new($self->{path});
     }
     elsif($ext eq "flac")
     {
-	$self->{audiofile}=ID3FS::AudioFile::Flac->new($path);
+	$self->{audiofile}=ID3FS::AudioFile::Flac->new($self->{path});
     }
     else
     {
-	print("$me: $path: Unknown extension: $ext\n");
+	print("$me: $self->{path}: Unknown extension: $ext\n");
 	return undef;
     }
     return $self;
@@ -77,6 +77,7 @@ sub v1genre   { return(shift->set("v1genre", @_));  }
 sub comment   { return(shift->set("comment", @_));  }
 sub audiotype { return(shift->set("audiotype"));    }
 sub haspic    { return(shift->set("haspic"));       }
+sub path      { return(shift->{path});              }
 
 sub delete_artist   { shift->{audiofile}->delete_artist();   }
 sub delete_album    { shift->{audiofile}->delete_album();    }