[Bps-public-commit] r10870 - in SVN-PropDB: lib/SVN/PropDB

[jesse at bestpractical.com]

Author: jesse
Date: Sat Feb 16 10:25:03 2008
New Revision: 10870

Added:
   SVN-PropDB/Makefile.PL
Modified:
   SVN-PropDB/lib/SVN/PropDB/Record.pm

Log:
* makefile.pl

Added: SVN-PropDB/Makefile.PL
==============================================================================
--- (empty file)
+++ SVN-PropDB/Makefile.PL	Sat Feb 16 10:25:03 2008
@@ -0,0 +1,8 @@
+#!/usr/bin/perl
+#
+use inc::Module::Install;
+
+requires('SVN::Core');
+all_from('lib/SVN/PropDB.pm');
+
+WriteAll();

Modified: SVN-PropDB/lib/SVN/PropDB/Record.pm
==============================================================================
--- SVN-PropDB/lib/SVN/PropDB/Record.pm	(original)
+++ SVN-PropDB/lib/SVN/PropDB/Record.pm	Sat Feb 16 10:25:03 2008
@@ -50,7 +50,7 @@
 sub get_prop {
     my $self = shift;
     my %args = validate(@_, {name => 1});
-    return %{$self->get_props}->{$args{'name'}};
+    return $self->get_props->{$args{'name'}};
 }