From 9cc38ee61f2ae03e79a2ee7f72719783c29c6eac Mon Sep 17 00:00:00 2001
From: "Richard W.M. Jones" <rjones@redhat.com>
Date: Tue, 15 Jul 2014 15:58:49 +0000
Subject: [PATCH] gettextCompat: Use Pervasives.format_of_string instead of
 Obj.magic.

---
 libgettext-ocaml/gettextCompat.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/libgettext-ocaml/gettextCompat.ml b/libgettext-ocaml/gettextCompat.ml
index 1a8ac44..08f00d5 100644
--- a/libgettext-ocaml/gettextCompat.ml
+++ b/libgettext-ocaml/gettextCompat.ml
@@ -25,7 +25,7 @@ open GettextCategory;;
 open GettextModules;;
 
 let unsafe_format_of_string fmt str = 
-  if true then
+  if false then
     Obj.magic str
   else
     format_of_string fmt
-- 
2.0.1