| Subject: | Hash accessors in Metadata classes |
| Date: | Fri, 27 Jul 2007 14:45:36 -0400 |
| To: | bug-Rose-DB-Object [...] rt.cpan.org |
| From: | Christopher Masto <chris [...] masto.com> |
I noticed I wasn't able to use
RDBO::Metadata::ForeignKey::key_column() until I made this change:
--- /usr/local/lib/perl5/site_perl/5.8.8/Rose/DB/Object/Metadata/
ForeignKey.pm~Mon Jan 15 14:07:35 2007
+++ /usr/local/lib/perl5/site_perl/5.8.8/Rose/DB/Object/Metadata/
ForeignKey.pm Fri Jul 27 14:32:10 2007
@@ -40,7 +40,7 @@
hash =>
[
- _key_column => { hash_key => 'key_columns' },
+ _key_column => { hash_key => '_key_columns' },
_key_columns => { interface => 'get_set_all' },
],
);
I'm not 100% sure that's right, since I really don't know what I'm
doing messing around in there, but I thought I should let you know
about it anyway. If it is a bug, I think there are similar ones in
the other Metadata classes.
Thanks for the excellent modules.