projects
/
id3fs.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
b2202c22f8cb13f03b4dfd388d8f8dbfa75adf65
[id3fs.git]
/
lib
/
ID3FS
/
Path.pm
1
package ID3FS::Path;
2
3
use strict;
4
use warnings;
5
6
sub new
7
{
8
my $proto=shift;
9
my $class=ref($proto) || $proto;
10
my $self={};
11
bless($self,$class);
12
13
$self->{db}=shift;
14
$self->{path}=shift;
15
16
return $self;
17
}
18
19
sub isdir
20
{
21
my($self)=@_;
22
return 1 if($self->{path} eq "/");
23
return 0;
24
}
25
26
sub dest
27
{
28
my($self)=@_;
29
return "FIXME";
30
}
31
32
sub dirents
33
{
34
my($self)=@_;
35
return $self->{db}->tags();
36
}
37
38
39
1;