fix otype attribute

[pmg-api.git] / PMG / RuleDB / MatchField.pm

diff --git a/PMG/RuleDB/MatchField.pm b/PMG/RuleDB/MatchField.pm
index 6e5b1345b3a21f4d5663b41a0666c28c738c0f46..04856395a78cf51d838d98ce344432098783b41c 100644 (file)
--- a/PMG/RuleDB/MatchField.pm
+++ b/PMG/RuleDB/MatchField.pm
@@ -36,7 +36,7 @@ sub new {
    
     my $class = ref($type) || $type;
 
-    my $self = $class->SUPER::new(otype(), $ogroup);
+    my $self = $class->SUPER::new($class->otype(), $ogroup);
 
     $self->{field} = $field;
     $self->{field_value} = $field_value;