From 032adb966948964a167cb97a7742ac87c0780c12 Mon Sep 17 00:00:00 2001 From: JSDurand Date: Tue, 12 Mar 2024 16:18:07 +0800 Subject: dashboard: Always display the ASCII-art of the picture I find it more pleasing than my hand-writing, haha. --- dashboard.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) (limited to 'dashboard.el') 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)) -- cgit v1.2.3-18-g5258