Add Pacmacs to games layer

alienscience · Oct 14, 2015 · 8296b81 · 8296b81
1 parent 101f57f
commit 8296b81
Show file tree

Hide file tree

Showing 2 changed files with 26 additions and 1 deletion.
diff --git a/layers/+fun/games/README.org b/layers/+fun/games/README.org
@@ -15,6 +15,7 @@ This layer allows you to play evilified games in spacemacs.
 
 The games available now are:
 - 2048-game
+- Pacmacs (Pacman for Emacs)
 - Tetris
 
 * Install
@@ -47,6 +48,15 @@ Possible helm actions:
 | ~k~         | Move the tiles up    |
 | ~l~         | Move the tiles right |
 
+** Pacmacs
+
+| Key Binding | Description       |
+|-------------+-------------------|
+| ~h~         | Move left  |
+| ~j~         | Move down  |
+| ~k~         | Move up    |
+| ~l~         | Move right |
+|             |                   |
 ** Tetris
 
 | Key Binding | Description                    |

diff --git a/layers/+fun/games/packages.el b/layers/+fun/games/packages.el
@@ -10,7 +10,10 @@
 ;;
 ;;; License: GPLv3
 
-(defvar games-packages '(2048-game))
+(defvar games-packages '(
+                         2048-game
+                         pacmacs
+                         ))
 
 (defun games/init-2048-game ()
   (use-package 2048-mode
@@ -24,3 +27,15 @@
                "k" '2048-up
                "h" '2048-left
                "l" '2048-right))))
+
+(defun games/init-pacmacs ()
+  (use-package pacmacs
+    :defer t
+    :init
+    (push '("pacmacs" . (pacmacs-start :quit (kill-buffer-ask (get-buffer "*Pacmacs*"))
+                                :reset pacmacs-start)) helm-games-list)
+    (evilify pacmacs-mode pacmacs-mode-map
+             "h" 'pacmacs-left
+             "j" 'pacmacs-down
+             "k" 'pacmacs-up
+             "l" 'pacmacs-right)))