diff options
| author | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2007-11-27 00:58:38 +0100 |
|---|---|---|
| committer | Arne Georg Gleditsch <argggh@lxr.linpro.no> | 2007-11-27 00:58:38 +0100 |
| commit | 5b3f52e26d53d40c1da454b175c71f4155d5f15c (patch) | |
| tree | 010eb27610bd0e908f5b3617fe8e4c0458d077b7 /lib | |
| parent | 905478e913aa51469c79f8a52d4f5e833004419b (diff) | |
Always prepend /
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/LXRng/Repo/Plain.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lib/LXRng/Repo/Plain.pm b/lib/LXRng/Repo/Plain.pm index c30835e..7e64d3c 100644 --- a/lib/LXRng/Repo/Plain.pm +++ b/lib/LXRng/Repo/Plain.pm @@ -8,6 +8,7 @@ use LXRng::Repo::Plain::Directory; sub new { my ($class, $root) = @_; + $root .= '/' unless $root =~ /\/$/; return bless({root => $root}, $class); } |