diff options
| author | ivan <ivan> | 2008-10-29 20:21:45 +0000 | 
|---|---|---|
| committer | ivan <ivan> | 2008-10-29 20:21:45 +0000 | 
| commit | 686459dd7e8e2e30c4a71440bf845ed67be0da47 (patch) | |
| tree | 55f7657a2951f21f1721c2001bc065f4d0da2a8a /FS | |
| parent | 9e992baf49d7ac4372fd9dab88f41731f04e53b8 (diff) | |
huh.  how did event editing ever work?  is this 5.10-specific?
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/part_event/Action.pm | 2 | 
1 files changed, 2 insertions, 0 deletions
| 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 ];  } | 
