From 589349282f89643ffb8810e3b514d1323f6e39c8 Mon Sep 17 00:00:00 2001 From: William Carroll Date: Wed, 22 Jan 2020 21:54:22 +0000 Subject: Format bookmark.el Move `bookmark/install-kbds?` to the top of the module. --- configs/shared/.emacs.d/wpc/bookmark.el | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) (limited to 'configs') diff --git a/configs/shared/.emacs.d/wpc/bookmark.el b/configs/shared/.emacs.d/wpc/bookmark.el index 710b2d8e7c04..7b28ec82710c 100644 --- a/configs/shared/.emacs.d/wpc/bookmark.el +++ b/configs/shared/.emacs.d/wpc/bookmark.el @@ -23,11 +23,15 @@ (cl-defstruct bookmark label path kbd) +(defconst bookmark/install-kbds? t + "When t, install keybindings.") + ;; TODO: Consider hosting this function somewhere other than here, since it ;; feels useful above of the context of bookmarks. ;; TODO: Assess whether it'd be better to use the existing function: ;; `counsel-projectile-switch-project-action'. See the noise I made on GH for ;; more context: https://github.com/ericdanan/counsel-projectile/issues/137 + (defun bookmark/handle-directory-dwim (path) "Open PATH as either a project directory or a regular directory. If PATH is `projectile-project-p', open with `counsel-projectile-find-file'. @@ -64,8 +68,6 @@ Otherwise, open with `counsel-find-file'." :kbd "p")) "List of registered bookmarks.") -(defconst bookmark/install-kbds? t - "When t, install keybindings.") ;; TODO: Consider `ivy-read' extension that takes a list of structs, ;; `struct-to-label' and `label-struct' functions. -- cgit 1.4.1