From: Amin Bandali Date: Thu, 11 Apr 2019 15:00:46 +0000 (-0400) Subject: [emacs] add a/reload-init function for reloading the right init file X-Git-Url: https://git.shemshak.org/~bandali/configs/commitdiff_plain/83eb5bce7f37ee4a36fb38b68ac4c335688c9238?ds=inline;hp=5c498315fdcad392c4d4326e7db33f21d51ba09b [emacs] add a/reload-init function for reloading the right init file Based on radian-reload-init: https://github.com/raxod502/straight.el/tree/aa2f612546815167f87dda835f8efaabf1264c7f#the-transaction-system --- diff --git a/init.org b/init.org index 62341a9..ee75041 100644 --- a/init.org +++ b/init.org @@ -297,6 +297,20 @@ integration, we will define a =use-feature= for plain ole ,@args)) #+end_src +Also, here's a useful function for reloading the init file (useful +after running =straight-check-all=: + +#+begin_src emacs-lisp +(defun a/reload-init () + "Reload init.el." + (interactive) + (straight-transaction + (straight-mark-transaction-as-init) + (load (if a/byte-compiled-init + (concat (file-name-sans-extension user-init-file) ".elc") + user-init-file)))) +#+end_src + *** =use-package= #+begin_quote @@ -820,7 +834,8 @@ While at it, let's bind a few for some =straight-*= functions too: ("f" . straight-freeze-versions) ("t" . straight-thaw-versions) ("P" . straight-prune-build) - ("r" . straight-get-recipe) + ("g" . straight-get-recipe) + ("r" . a/reload-init) ;; M-x ^straight-.*-all$ ("a c" . straight-check-all) ("a f" . straight-fetch-all)