Skip Menu |

This queue is for tickets about the Data-Serializer CPAN distribution.

Report information
The Basics
Id: 14781
Status: resolved
Worked: 5 min
Priority: 0/
Queue: Data-Serializer
People
Owner: neil [...] neely.cx
Requestors: rk1990 [...] google.com
Cc:
AdminCc:
Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

History Show all quoted text
  Tue Sep 27 17:17:00 2005 Guest - Ticket created
Subject: Bug while using portable option and 'Storable' serializer
--- /usr/local/lib/perl5/site_perl/5.8.6/Data/Serializer.pm 2005-02-07 20:28:03.000000000 -0500 +++ Serializer.pm 2005-09-23 18:09:58.710117000 -0400 @@ -63,7 +63,7 @@ } else { $serializer = $_internal{$id}->{serializer}; } - $_internal{$id}->{serializer_obj} = {options => $self->options()}; + $_internal{$id}->{serializer_obj}->{options} = $self->options(); bless $_internal{$id}->{serializer_obj}, "Data::Serializer::$serializer"; } sub serializer {
  Tue Sep 27 18:03:38 2005 neil [...] neely.cx - Correspondence added 5 min
Thanks for the patch I've made this change and uploaded it as version .32 to CPAN, it should be available shortly. [guest - Tue Sep 27 17:17:00 2005]: Show quoted text
> --- /usr/local/lib/perl5/site_perl/5.8.6/Data/Serializer.pm 2005-02-07 > 20:28:03.000000000 -0500 > +++ Serializer.pm 2005-09-23 18:09:58.710117000 -0400 > @@ -63,7 +63,7 @@ > } else { > $serializer = $_internal{$id}->{serializer}; > } > - $_internal{$id}->{serializer_obj} = {options => $self-
> >options()};
> + $_internal{$id}->{serializer_obj}->{options} = $self->options(); > bless $_internal{$id}->{serializer_obj}, > "Data::Serializer::$serializer"; > } > sub serializer {
  Tue Sep 27 18:03:39 2005 neil [...] neely.cx - Status changed from 'new' to 'resolved'
  Tue Sep 27 18:03:39 2005 neil [...] neely.cx - Given to NEELY