dashboard: Always display the ASCII-art of the picture

I find it more pleasing than my hand-writing, haha.

1 files changed, 5 insertions, 5 deletions

diff --git a/dashboard.el b/dashboard.el
index 663cf7a..afedd7c 100644
--- a/dashboard.el
+++ b/dashboard.el
@@ -93,7 +93,7 @@ If FORCE is non-nil, re-gerenate the dashboard buffer."
       (with-current-buffer dashboard
         (erase-buffer)
         (cond
-         ((display-graphic-p)
+         (nil;; (display-graphic-p)
           (let ((image
                  (create-image
                   (expand-file-name
@@ -113,16 +113,16 @@ If FORCE is non-nil, re-gerenate the dashboard buffer."
                    (insert (mapconcat #'identity
                                       dashboard-cat-text
                                       (string 10)))
-                   (car (buffer-text-pixel-size)))))
+                   (car (buffer-text-pixel-size))))
+                (space-width (string-pixel-width (string 32))))
             (mapc
              (lambda (text)
                (insert
                 (make-string
                  (floor
                   (- (window-width nil t)
-                     (string-pixel-width (string 32))
-                     width)
-                  2)
+                     space-width width)
+                  (* 2 space-width))
                  32)
                 text
                 10))