[nongnu] elpa/pacmacs 3344de1bbe 322/472: Adapt render-track-board for new track board

[ELPA Syncer]

branch: elpa/pacmacs
commit 3344de1bbec74216fe72119c7fa89fc9bef885ce
Author: rexim <reximkut@gmail.com>
Commit: rexim <reximkut@gmail.com>

    Adapt render-track-board for new track board
    
    (#159)
---
 pacmacs-render.el | 15 ++++-----------
 1 file changed, 4 insertions(+), 11 deletions(-)

diff --git a/pacmacs-render.el b/pacmacs-render.el
index 3606baa326..f0fb72cfda 100644
--- a/pacmacs-render.el
+++ b/pacmacs-render.el
@@ -70,17 +70,10 @@
     (dotimes (row height)
       (dotimes (column width)
         (let ((x (pacmacs--cell-wrapped-get track-board row column)))
-          (cond
-           ((null x)
-            (insert "."))
-           ((equal x 'left)
-            (insert "<"))
-           ((equal x 'right)
-            (insert ">"))
-           ((equal x 'up)
-            (insert "^"))
-           ((equal x 'down)
-            (insert "v")))))
+          (insert "\t")
+          (if x
+              (insert (int-to-string x))
+            (insert "."))))
       (insert "\n"))))
 
 (provide 'pacmacs-render)