From f35e367d61277573326be776f2eb8af5755657cd Mon Sep 17 00:00:00 2001
From: Arne Georg Gleditsch <argggh@lxr.linpro.no>
Date: Fri, 30 Nov 2007 10:44:31 +0100
Subject: Add cache keys for Plain repo backend.

---
 lib/LXRng/Repo/Plain/Directory.pm | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'lib/LXRng/Repo/Plain')

diff --git a/lib/LXRng/Repo/Plain/Directory.pm b/lib/LXRng/Repo/Plain/Directory.pm
index 8d7e701..788f6bc 100644
--- a/lib/LXRng/Repo/Plain/Directory.pm
+++ b/lib/LXRng/Repo/Plain/Directory.pm
@@ -12,6 +12,12 @@ sub new {
     return bless({name => $name, path => $path, stat => $stat}, $class);
 }
 
+sub cache_key {
+    my ($self) = @_;
+
+    return $$self{'path'};
+}
+
 sub time {
     my ($self) = @_;
 
-- 
cgit v1.2.3