From: ivan Date: Wed, 29 Oct 2008 20:21:45 +0000 (+0000) Subject: huh. how did event editing ever work? is this 5.10-specific? X-Git-Tag: root_of_webpay_support~278 X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=686459dd7e8e2e30c4a71440bf845ed67be0da47 huh. how did event editing ever work? is this 5.10-specific? --- diff --git a/FS/FS/part_event/Action.pm b/FS/FS/part_event/Action.pm index c41af2851..9dcde5a61 100644 --- a/FS/FS/part_event/Action.pm +++ b/FS/FS/part_event/Action.pm @@ -204,6 +204,7 @@ Returns the option fields as an (ordered) hash reference. sub option_fields_hashref { my $self = shift; tie my %hash, 'Tie::IxHash', $self->option_fields; + \%hash; } =item option_fields_listref @@ -215,6 +216,7 @@ Returns just the option field names as a list reference. sub option_fields_listref { my $self = shift; my $hashref = $self->option_fields_hashref; + warn $hashref; [ keys %$hashref ]; }