1 files changed, 10 insertions, 0 deletions
diff --git a/mg.c b/mg.c
index 821de5b42f..c2a006b7e6 100644
--- a/mg.c
+++ b/mg.c
@@ -1161,6 +1161,16 @@ MAGIC* mg;
 }
 
 int
+magic_setfm(sv,mg)
+SV* sv;
+MAGIC* mg;
+{
+    sv_unmagic(sv, 'f');
+    SvCOMPILED_off(sv);
+    return 0;
+}
+
+int
 magic_setuvar(sv,mg)
 SV* sv;
 MAGIC* mg;