=item *
-Closer to being aboe to do a Serialize::Storable that doesn't require class-based connections
+Closer to being able to do a Serialize::Storable that doesn't require class-based connections
=back
sub resolve { return $_[0]->schema->source($_[0]->source_moniker) }
+=head2 STORABLE_freeze
+
+Freezes a handle.
+
+=cut
+
sub STORABLE_freeze {
my ($self, $cloning) = @_;
my $to_serialize = { %$self };
return (Storable::freeze($to_serialize));
}
+=head2 STORABLE_thaw
+
+Thaws frozen handle.
+
+=cut
+
sub STORABLE_thaw {
my ($self, $cloning,$ice) = @_;
%$self = %{ Storable::thaw($ice) };