--- Compress-LZF/LZF.xs	2001/09/27 20:09:02	1.6
+++ Compress-LZF/LZF.xs	2002/02/27 20:51:21	1.8
@@ -230,7 +230,8 @@
           XPUSHs (sv_2mortal (newSVpvn ("\02", 1))); /* 02 == MAGIC_undef */
         else if (SvTYPE(sv) != SVt_IV
             && SvTYPE(sv) != SVt_NV
-            && SvTYPE(sv) != SVt_PV) /* mstore */
+            && SvTYPE(sv) != SVt_PV
+            && SvTYPE(sv) != SVt_PVMG) /* mstore */
           {
             if (!storable_mstore)
               need_storable ();
@@ -267,6 +268,7 @@
         PROTOTYPE: $
         PPCODE:
 
+        SvGETMAGIC (sv);
         if (SvPOK (sv) && IN_RANGE (SvPV_nolen (sv)[0], MAGIC_LO, MAGIC_HI))
           {
             switch (SvPVX (sv)[0])