repalce delete control char

faldor20 · Sep 6, 2024 · fe30b9b · fe30b9b
1 parent cba4adb
commit fe30b9b
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/jj_tui/lib/ansiReverse.ml b/jj_tui/lib/ansiReverse.ml
@@ -158,6 +158,10 @@ let ansi_string_to_image ?(extra_attr = A.empty) str =
     |> Base.String.Search_pattern.replace_all
          (Base.String.Search_pattern.create "\t")
          ~with_:"    "
+     (*delete control char*)
+    |> Base.String.Search_pattern.replace_all
+         (Base.String.Search_pattern.create "\u{7f}")
+         ~with_:"    "
     (*replace form feed with a symbol: https://codepoints.net/U+000C?lang=en*)
     |> Base.String.Search_pattern.replace_all
          (Base.String.Search_pattern.create "")