1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index f4783fb68a..26211dd4d0 100644
--- a/mg.c
+++ b/mg.c
@@ -3078,7 +3078,7 @@ Perl_magic_set(pTHX_ SV *sv, MAGIC *mg)
 #else
 #   define PERL_VMS_BANG 0
 #endif
-#if defined(WIN32) && ! defined(UNDER_CE)
+#if defined(WIN32)
 	SETERRNO(win32_get_errno(SvIOK(sv) ? SvIVX(sv) : SvOK(sv) ? sv_2iv(sv) : 0),
 		 (SvIV(sv) == EVMSERR) ? 4 : PERL_VMS_BANG);
 #else