From 686459dd7e8e2e30c4a71440bf845ed67be0da47 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Wed, 29 Oct 2008 20:21:45 +0000
Subject: [PATCH] huh.  how did event editing ever work?  is this
 5.10-specific?

---
 FS/FS/part_event/Action.pm | 2 ++
 1 file changed, 2 insertions(+)

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 ];
 }
 
-- 
2.11.0