Solve #149
diff --git a/R/util.R b/R/util.R
index 3f8237a..2de14b1 100644
--- a/R/util.R
+++ b/R/util.R
@@ -138,3 +138,8 @@
   enc2utf8(as.character(base::format(x, trim = TRUE, justify = 'none')))
 }
 
+input_escape <- function(x, latex_align) {
+  x <- escape_latex2(x)
+  x <- linebreak(x, align = latex_align, double_escape = TRUE)
+}
+