Support org shortcut and ELisp fn

Support generic ELisp fn. Should have a dumping grounds for ELisp
fns similar to my dumping_grounds.zsh.

1 files changed, 5 insertions, 0 deletions

diff --git a/configs/shared/emacs/.emacs.d/wpc/packages/wpc-misc.el b/configs/shared/emacs/.emacs.d/wpc/packages/wpc-misc.el
index 1f1b4d580333..46812c60d652 100644
--- a/configs/shared/emacs/.emacs.d/wpc/packages/wpc-misc.el
+++ b/configs/shared/emacs/.emacs.d/wpc/packages/wpc-misc.el
@@ -48,6 +48,7 @@
 (set-register ?d '(file . "~/programming/dotfiles"))
 (set-register ?s '(file . "~/.slate.js"))
 (set-register ?D '(file . "~/Dropbox"))
+(set-register ?o '(file . "~/Documents/org/"))
 
 (set-register ?v '(file . "~/.config/nvim/init.vim"))
 (set-register ?e '(file . "~/.emacs.d/init.el"))
@@ -176,5 +177,9 @@
   :config
   (push 'company-lsp company-backends))
 
+(defun wpc/frame-name ()
+  "Return the name of the current frame."
+  (frame-parameter nil 'name))
+
 (provide 'wpc-misc)
 ;;; wpc-misc.el ends here