branch: elpa/pacmacs
commit 5db26b2e3d53ef88df68be595b2b9273f9ddf586
Author: rexim <[email protected]>
Commit: rexim <[email protected]>
Make the Game Over sign even more smaller
---
maps/game-over.txt | 20 ++++++++------------
pacmacs-score.el | 1 +
pacmacs.el | 5 +++--
3 files changed, 12 insertions(+), 14 deletions(-)
diff --git a/maps/game-over.txt b/maps/game-over.txt
index 7d005bd7d1..f28cdbb21f 100644
--- a/maps/game-over.txt
+++ b/maps/game-over.txt
@@ -1,13 +1,9 @@
-####
-# # ### ##### ##
-# # # # # # #
-# ## ### # # # ##
-# # # # # # # #
-#### # # # # # ##
+### ### ##### ###
+# # # # # # # #
+# # ### # # # ##
+### # # # # # ##
-####
-# # # # ## ###
-# # # # # # #
-# # # ## ## ####
-# # # # # # #
-#### ### ## # #
+### # # ### ###
+# # # # # # # #
+# # # # ## ####
+### # ## # #
diff --git a/pacmacs-score.el b/pacmacs-score.el
index d2aba7b6f3..81bb23f9a8 100644
--- a/pacmacs-score.el
+++ b/pacmacs-score.el
@@ -73,6 +73,7 @@
(--> (pacmacs--read-score-table)
(-map (-compose #'length #'car) it)
(apply #'max it))))
+ (insert "Best Scores:\n------------\n")
(-each score-table
(-lambda ((nickname . score))
(insert (format "%s%s %d\n"
diff --git a/pacmacs.el b/pacmacs.el
index 114e2fa2bc..057a0aea6b 100644
--- a/pacmacs.el
+++ b/pacmacs.el
@@ -400,7 +400,7 @@
(let ((inhibit-read-only t))
(erase-buffer)
- (insert (format "Score: %d\n" pacmacs-score))
+ (insert (format "Score: %d\n\n" pacmacs-score))
(when pacmacs-debug-output
(pacmacs--render-track-board pacmacs-track-board))
@@ -433,7 +433,8 @@
(when (equal pacmacs-game-state 'game-over)
(-> (pacmacs--read-score-table)
(pacmacs--sort-score-table)
- (pacmacs--render-score-table))))))
+ (pacmacs--render-score-table)))
+ (goto-char 0))))
(defun pacmacs-up ()
(interactive)
