From f2bd9caeceab3aaba373baa8db875c0fc0876222 Mon Sep 17 00:00:00 2001
From: malc <moosotc@gmail.com>
Date: Sat, 28 Jul 2018 05:10:10 +0300
Subject: [PATCH] Sigh

---
 main.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/main.ml b/main.ml
index d8d334b..9ad515e 100644
--- a/main.ml
+++ b/main.ml
@@ -1481,7 +1481,7 @@ let linknentry text key = match [@warning "-4"] key with
      linknact (fun under -> state.text <- undertext under) text;
      TEcont text
   | _ ->
-     state.text <- Printf.sprintf "invalid key";
+     state.text <- "invalid key";
      TEcont text
 ;;
 
-- 
2.11.4.GIT