diff -uNr ming-0.4.3/perl_ext/Exports.c ming-0.4.3p/perl_ext/Exports.c
--- ming-0.4.3/perl_ext/Exports.c	2009-11-25 18:17:26.000000000 +0200
+++ ming-0.4.3p/perl_ext/Exports.c	2011-06-13 16:08:22.083346473 +0300
@@ -190,7 +190,7 @@
             SvPVX(caller), sub, SvPVX(class), sub); 
 #endif 
     gv = gv_fetchpv(form("%s::%s",SvPVX( caller), sub), TRUE, SVt_PVCV); 
-    GvCV(gv) = perl_get_cv(form("%s::%s", SvPVX(class), sub), TRUE); 
+    GvCV_set(gv, perl_get_cv(form("%s::%s", SvPVX(class), sub), TRUE)); 
     GvIMPORTED_CV_on(gv); 
     GvMULTI_on(gv);
 }