diff options
| author | JSDurand <mmemmew@gmail.com> | 2024-03-12 16:18:07 +0800 |
|---|---|---|
| committer | JSDurand <mmemmew@gmail.com> | 2024-03-12 16:18:07 +0800 |
| commit | 032adb966948964a167cb97a7742ac87c0780c12 (patch) | |
| tree | 96b58fd67a8e1fc4589cc56146d9b46d452b6c6a | |
| parent | 0e4bc25f934541067cb186416a1f6ca75fc1fca8 (diff) | |
dashboard: Always display the ASCII-art of the picture
I find it more pleasing than my hand-writing, haha.
| -rw-r--r-- | dashboard.el | 10 |
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)) |