provides => {
exists => 'exists_table',
keys => 'table_ids',
+ values => 'get_tables',
get => 'get_table',
},
curries => {
}
}
},
- default => sub { {} },
+ default => sub { my %hash = (); tie %hash, 'Tie::IxHash'; return \%hash },
);
has 'views' => (
provides => {
exists => 'exists_view',
keys => 'view_ids',
+ values => 'get_views',
get => 'get_view',
},
curries => {
provides => {
exists => 'exists_procedure',
keys => 'procedure_ids',
+ values => 'get_procedures',
get => 'get_procedure',
},
curries => {
},
default => sub { {} },
);
+
+ method is_valid { 1 }
}