stop gratuitous hash manipulatoin during enum untaint

diff --git a/FS/FS/Record.pm b/FS/FS/Record.pm
index 3e3af52..be29b5c 100644 (file)
--- a/FS/FS/Record.pm
+++ b/FS/FS/Record.pm
@@ -2342,7 +2342,7 @@ sub ut_enum {
   my( $self, $field, $choices ) = @_;
   foreach my $choice ( @$choices ) {
     if ( $self->getfield($field) eq $choice ) {
-      $self->setfield($choice);
+      $self->setfield($field, $choice);
       return '';
     }
   }