diff --git a/StructFields.pm b/StructFields.pm
index 0a168a456..ef0f9a082 100644
--- a/StructFields.pm
+++ b/StructFields.pm
@@ -753,7 +753,7 @@ sub emit_struct_fields($$;%) {
                 emit $_ for @ctor_lines;
             };
         }
-    } 'ctors' unless $flags{-noconstructor};
+    } 'ctors' unless $flags{-noctor};
 
     %info = $flags{-addmethods}->($tag) if $flags{-addmethods};