From: Tim Vaughan <timv@ughan.xyz>
Date: Thu, 12 Dec 2019 18:58:08 +0000 (+0100)
Subject: Filter ansi codes from gopher menu items.
X-Git-Tag: v2.6.0~5
X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?p=elpher.git;a=commitdiff_plain;h=3f56dde4342dcfecc2b8b4d1c6e07436d2ab9991

Filter ansi codes from gopher menu items.
---

diff --git a/elpher.el b/elpher.el
index 06c669e..474eee1 100644
--- a/elpher.el
+++ b/elpher.el
@@ -619,9 +619,10 @@ If ADDRESS is not supplied or nil the record is rendered as an
     (if type-map-entry
         (let* ((margin-code (elt type-map-entry 2))
                (face (elt type-map-entry 3))
-               (page (elpher-make-page display-string address)))
+               (filtered-display-string (ansi-color-filter-apply display-string))
+               (page (elpher-make-page filtered-display-string address)))
           (elpher-insert-margin margin-code)
-          (insert-text-button display-string
+          (insert-text-button filtered-display-string
                               'face face
                               'elpher-page page
                               'action #'elpher-click-link