[nongnu] elpa/inf-clojure 5ef6bdf 123/313: Revert "Remove unwanted ansi chars from the REPL output"

[ELPA Syncer]

branch: elpa/inf-clojure
commit 5ef6bdf09e8716340f09a08d5fa957ca3ebeef18
Author: Andrea Richiardi <a.richiardi.work@gmail.com>
Commit: Bozhidar Batsov <bozhidar.batsov@gmail.com>

    Revert "Remove unwanted ansi chars from the REPL output"
    
    This reverts commit a36d2a0473a211078af995ef9ea28f00fe1e6b32.
---
 inf-clojure.el | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/inf-clojure.el b/inf-clojure.el
index 0f36dd6..092d43c 100644
--- a/inf-clojure.el
+++ b/inf-clojure.el
@@ -344,7 +344,6 @@ to continue it."
   (setq comint-input-filter #'inf-clojure-input-filter)
   (setq-local comint-prompt-read-only inf-clojure-prompt-read-only)
   (add-hook 'comint-preoutput-filter-functions #'inf-clojure-preoutput-filter 
nil t)
-  (add-hook 'comint-output-filter-functions 'inf-clojure--ansi-filter)
   (add-hook 'completion-at-point-functions #'inf-clojure-completion-at-point 
nil t)
   (ansi-color-for-comint-mode-on))
 
@@ -369,19 +368,6 @@ to continue it."
   "Remove subprompts from STRING."
   (replace-regexp-in-string inf-clojure-subprompt "" string))
 
-(defconst inf-clojure--ansi-clear-line "\\[1G\\|\\[0J\\|\\[13G"
-  "Ansi codes sent by the lumo repl that we need to clear." )
-
-(defun inf-clojure--ansi-filter (string)
-  "Filter unwanted ansi character from STRING."
-  (save-excursion
-    ;; go to start of first line just inserted
-    (comint-goto-process-mark)
-    (goto-char (max (point-min) (- (point) (string-width string))))
-    (forward-line 0)
-    (while (re-search-forward inf-clojure--ansi-clear-line nil t)
-      (replace-match ""))))
-
 (defun inf-clojure-preoutput-filter (str)
   "Preprocess the output STR from interactive commands."
   (cond