X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FResultSourceHandle.pm;h=4a402e9d0e4962d2c104caf1814e6f68459b3537;hb=daf4e3bed37d35feb43338142935dcb4c61313b8;hp=6d6353f88a7574154b4f0976f901882aa305b4bb;hpb=b24d86a1fbeb89083bc2eeeeb286d590ffea702a;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/ResultSourceHandle.pm b/lib/DBIx/Class/ResultSourceHandle.pm index 6d6353f..4a402e9 100644 --- a/lib/DBIx/Class/ResultSourceHandle.pm +++ b/lib/DBIx/Class/ResultSourceHandle.pm @@ -77,7 +77,7 @@ sub STORABLE_freeze { my ($self, $cloning) = @_; my $to_serialize = { %$self }; - + my $class = $self->schema->class($self->source_moniker); $to_serialize->{schema} = $class; return (Storable::freeze($to_serialize)); @@ -87,7 +87,7 @@ sub STORABLE_freeze { Thaws frozen handle. Resets the internal schema reference to the package variable C<$thaw_schema>. The recomened way of setting this is to use -C<$schema->thaw($ice)> which handles this for you. +C<< $schema->thaw($ice) >> which handles this for you. =cut