Clearer names for core files

modules/lib-demo.el

@@ -1,14 +0,0 @@
-;;; lib-demo.el
-
-;; This library offers:
-;;   + impatient-mode: for broadcasting my emacs session
-;;   + TODO integration with reveal.js for presentations
-;;   + TODO "big-mode", for making emacs presentable for screencasts/share
-;;   + TODO quick note/time keeping for live/youtube recordings
-
-(use-package impatient-mode
-  :defer t
-  :commands httpd-start)
-
-(provide 'lib-demo)
-;;; lib-demo.el ends here

modules/lib-plugin.el

@@ -1,35 +0,0 @@
-;;; lib-plugin.el
-
-(defun narf-lb6-reload ()
-  (interactive)
-  (let ((dir (f-traverse-upwards (lambda (f) (string-suffix-p ".lbaction" f)))))
-    (shell-command (format "open %s" dir))))
-
-(define-minor-mode lb6-mode
-  "Launchbar development mode."
-  :init-value nil
-  :lighter    " lb6"
-  :keymap (let ((map (make-sparse-keymap)))
-            (map! :map map
-                  (:localleader
-                    :n "b" 'narf-lb6-reload))
-            map)
-  (add-yas-minor-mode! 'lb6-mode))
-(associate! lb6-mode :match "\\.lb\\(action\\|ext\\)/.+$")
-
-;;
-
-(define-minor-mode hammerspoon-mode
-  :init-value nil
-  :lighter " hammer"
-  :keymap (let ((map ))
-            (map! :map map
-                  (:localleader
-                    :n "b" (λ! (shell-command (format "open hammerspoon://reload")))))
-            map)
-  (add-yas-minor-mode! 'hammerspoon-mode))
-(associate! hammerspoon-mode :match "/\\.?hammerspoon/.+\\.lua$")
-
-(provide 'lib-plugin)
-;;; lib-plugin.el ends here
-

modules/lib-tmux.el

@@ -1,70 +0,0 @@
-;;; lib-tmux.el
-
-;; This library offers:
-;;   + TODO An integration/abstraction layer to make it seem like tmux and emacs are one
-;;     program.
-;;   + TODO A way to manage tmux sessions and layouts from emacs; possibly trigger them
-;;     depending on current project.
-
-;;;###autoload
-(defun tmux (command &optional modes)
-  (let ((format
-         (concat "tmux send-keys "
-                 (if (or (eq modes t)
-                         (eq modes 'clear)
-                         (memq 'clear modes))
-                     "C-u " "")
-                 "%s"
-                 (if (or (eq modes t)
-                         (eq modes 'run)
-                         (memq 'run modes))
-                     " Enter" ""))))
-    (shell-command (format format (shell-quote-argument command)))))
-
-(evil-define-interactive-code "<term>"
-  "Ex tmux argument (a mix between <sh> <f> and <fsh>)"
-  :ex-arg shell
-  (list (when (evil-ex-p) (evil-ex-file-arg))))
-
-;;;###autoload (autoload 'narf:tmux-cd "lib-tmux" nil t)
-(evil-define-command narf:tmux-cd (&optional bang)
-  (interactive "<!>")
-  (if bang
-      (narf/tmux-cd-to-project)
-    (narf/tmux-cd-to-here)))
-
-;;;###autoload (autoload 'narf:tmux "lib-tmux" nil t)
-(evil-define-operator narf:tmux (&optional command bang)
-  "Sends input to tmux. Use `bang' to append to tmux"
-  :type inclusive
-  :repeat t
-  (interactive "<term><!>")
-  (if (not command)
-      (os-switch-to-term)
-    (tmux command bang)
-    (when (evil-ex-p)
-      (message "[Tmux] %s" command))))
-
-;;;###autoload
-(defun narf/tmux-new-window ()
-  (interactive)
-  (tmux "tmux new-window" t))
-
-;;;###autoload
-(defun narf/tmux-cd-to-here (&optional dir)
-  (interactive)
-  (tmux (format "cd '%s'" (or dir default-directory))))
-
-;;;###autoload
-(defun narf/tmux-cd-to-project ()
-  (interactive)
-  (narf/tmux-cd-to-here (narf/project-root)))
-
-;;;;;;;;;;
-
-;; TODO
-;; (defun narf/window (direction)
-;;   )
-
-(provide 'lib-tmux)
-;;; lib-tmux.el ends here