--- trunk/lib/Frey/DelIcioUs.pm 2008/11/06 17:58:20 323 +++ trunk/lib/Frey/DelIcioUs.pm 2008/11/08 16:59:08 333 @@ -19,14 +19,10 @@ required => 1, ); -has 'path' => ( - is => 'ro', - isa => 'Str', - default => sub { - my $self = shift; - 'var/delicious/' . $self->username; - } -); +sub path { + my $self = shift; + 'var/delicious/' . $self->username; +} sub data { my $self = shift;