From d51b55b632397e4469a8902e77dbcb188a6078ed Mon Sep 17 00:00:00 2001
From: Jeremy Dormitzer <jeremydormitzer@lola.com>
Date: Mon, 11 Feb 2019 13:05:33 -0500
Subject: [PATCH] Add Forge; configure NeoTree; change projectile keybindings

---
 emacs/init.org | 37 +++++++++++++++++++++++++++++--------
 1 file changed, 29 insertions(+), 8 deletions(-)

diff --git a/emacs/init.org b/emacs/init.org
index 35e05cd..b38d1f5 100755
--- a/emacs/init.org
+++ b/emacs/init.org
@@ -134,7 +134,7 @@ Interfacing with Pass, the "standard Unix password manager". This should also be
 	       password-store-copy)
     :config
     (setq password-store-password-length 20)
-    (leader-def-key "p" 'password-store-copy))
+    (leader-def-key "P" 'password-store-copy))
 
   (use-package pass
     :if (executable-find "pass")
@@ -525,9 +525,22 @@ I don't want which-key display "lambda" for the descriptions of these, so set a
 A package to browse files in a tree view
 #+BEGIN_SRC emacs-lisp
   (use-package neotree
-    :commands neotree-toggle
-    :init
-    (leader-def-key "d" 'neotree-toggle)
+    :commands neotree-project-dir
+    :config
+    (defun neotree-project-dir ()
+      "Open NeoTree using the git root."
+      (interactive)
+      (let ((project-dir (projectile-project-root))
+	    (file-name (buffer-file-name))))
+      (neotree-toggle)
+      (if project-dir
+	  (if (neo-global--window-exists-p)
+	      (progn
+		(neotree-dir project-dir)
+		(neotree-find file-name))
+	    (message "Could not find git project root."))))
+    (leader-def-key "d" #'neotree-toggle)
+    (setq neo-smart-open t)
     :general
     (neotree-mode-map "SPC" leader-map))
 #+END_SRC
@@ -802,9 +815,9 @@ Display inline images after executing a source block:
   (use-package projectile
     :config
     (projectile-mode)
-    (jdormit/define-prefix "fp" "projectile")
-    (leader-def-key "fpf" 'projectile-find-file)
-    (leader-def-key "fpg" 'projectile-grep))
+    (jdormit/define-prefix "p" "projectile")
+    (leader-def-key "pf" 'projectile-find-file)
+    (leader-def-key "pg" 'projectile-grep))
 #+END_SRC
 
 * Mode line
@@ -1212,7 +1225,9 @@ Enable evil keybindings:
 
 #+BEGIN_SRC emacs-lisp
   (jdormit/define-prefix "g" "git")
-  (leader-def-key "gs" 'magit-status)
+  (leader-def-key "gs" #'magit-status)
+  (leader-def-key "gb" #'magit-blame-popup)
+  (leader-def-key "gf" #'magit-file-popup)
 #+END_SRC
 
 Use ido-mode for completion within Magit:
@@ -1220,6 +1235,12 @@ Use ido-mode for completion within Magit:
   (setq magit-completing-read-function 'magit-ido-completing-read)
 #+END_SRC
 
+** Forge
+[[https://github.com/magit/forge][Forge]] is an extension for Magit that lets it interact with code forges (e.g. GitHub).
+#+BEGIN_SRC emacs-lisp
+  (use-package forge :quelpa)
+#+END_SRC
+
 * Ledger Mode
 This mode requires that [[https://github.com/ledger/ledger][ledger]] be installed on the system.
 #+BEGIN_SRC emacs-lisp