1 files changed, 1 insertions, 0 deletions
diff --git a/lib/pp.ml4 b/lib/pp.ml4
index 569a028f..d3b402e3 100644
--- a/lib/pp.ml4
+++ b/lib/pp.ml4
@@ -341,6 +341,7 @@ let msgnl x = msgnl_with !std_ft x
 let msgerr x = msg_with !err_ft x
 let msgerrnl x = msgnl_with !err_ft x
 let msg_warning x = msg_warning_with !err_ft x
+let msg_warn x = msg_warning (str x)
 
 (* Same specific display in emacs as warning, but without the "Warning:" *)
 let msg_debug x = msgnl (emacs_quote x)