[elpa] externals/realgud-trepan-ni 7714b71 10/25: DRY ansi-schmutz code (and use it)

[Rocky Bernstein]

branch: externals/realgud-trepan-ni
commit 7714b716af1c04cb9e426a1089e341e8542f7fcc
Author: rocky <address@hidden>
Commit: rocky <address@hidden>

    DRY ansi-schmutz code (and use it)
---
 trepan-ni/core.el |  9 ---------
 trepan-ni/main.el | 14 +++++++-------
 2 files changed, 7 insertions(+), 16 deletions(-)

diff --git a/trepan-ni/core.el b/trepan-ni/core.el
index 40aa113..725e37e 100644
--- a/trepan-ni/core.el
+++ b/trepan-ni/core.el
@@ -133,15 +133,6 @@ Note that path elements have been expanded via 
`expand-file-name'.
                              realgud:trepan-ni-minibuffer-history
                              "js" "\\.js$"))
 
-(defun realgud:trepan-ni-remove-ansi-shmutz()
-  "Remove ASCII escape sequences that node.js 'decorates' in
-prompts and interactive output with"
-  (add-to-list
-   'comint-preoutput-filter-functions
-   (lambda (output)
-     (replace-regexp-in-string "\033\\[[0-9]+[GKJ]" "" output)))
-  )
-
 (defun realgud:trepan-ni-reset ()
   "Trepan-Ni cleanup - remove debugger's internal buffers (frame,
 breakpoints, etc.)."
diff --git a/trepan-ni/main.el b/trepan-ni/main.el
index 2d4a050..fc7230d 100644
--- a/trepan-ni/main.el
+++ b/trepan-ni/main.el
@@ -71,13 +71,13 @@ fringe and marginal icons.
                               'trepan-ni-query-cmdline 
'trepan-ni-parse-cmd-args
                               'realgud:trepan-ni-minibuffer-history
                               opt-cmd-line no-reset)))
-    ;; (if cmd-buf
-    ;;         (with-current-buffer cmd-buf
-    ;;           ;; FIXME should allow customization whether to do or not
-    ;;           ;; and also only do if hook is not already there.
-    ;;           (realgud:remove-ansi-schmutz)
-    ;;           )
-    ;;   )
+    (if cmd-buf
+       (with-current-buffer cmd-buf
+         ;; FIXME should allow customization whether to do or not
+         ;; and also only do if hook is not already there.
+         (realgud:remove-ansi-schmutz)
+         )
+      )
     ))
 
 (defalias 'trepan-ni 'realgud:trepan-ni)