feat: Add keybinding stubs

users/crumb/programs/emacs/lib/syd-buffers.el

@@ -0,0 +1,25 @@
+;;; syd-buffers.el -*- lexical-binding: t; -*-
+
+(require 'syd-prelude)
+
+(syd-define-stub
+ syd/kill-all-buffers
+ :desc "Kill all buffers.  See `doom/kill-all-buffers'."
+ :interactive t)
+
+(syd-define-stub
+ syd/kill-other-buffers
+ :desc "Kill other buffers.  See `doom/kill-other-buffers'."
+ :interactive t)
+
+(syd-define-stub
+ syd/kill-burried-buffers
+ :desc "Kill burried buffers.  See `doom/kill-burried-buffers'."
+ :interactive t)
+
+(syd-define-stub
+ syd/save-buffer-as-root
+ :desc "Sudo save buffer as root.  See `doom/sudo-save-buffer'"
+ :interactive t)
+
+(provide 'syd-buffers)

users/crumb/programs/emacs/lib/syd-file.el

@@ -0,0 +1,50 @@
+;;; syd-file.el -*- lexical-binding: t; -*-
+
+(require 'syd-prelude)
+
+(syd-define-stub
+ syd/copy-this-file
+ :desc "Copy current file.  See `doom/copy-this-file'."
+ :interactive t)
+
+(syd-define-stub
+ syd/delete-this-file
+ :desc "Delete current file.  See `doom/delete-this-file'."
+ :interactive t)
+
+(syd-define-stub
+ syd/move-this-file
+ :desc "Move current file.  See `doom/move-this-file'."
+ :interactive t)
+
+(syd-define-stub
+ syd/find-file-under-emacs-user-directory
+ :desc "Find under `emacs-user-directory'.  See `doom/find-file-in-private-config'."
+ :interactive t)
+
+(syd-define-stub
+ syd/find-file-under-here
+ :desc "Find under CWD.  See `+default/find-file-under-here'."
+ :interactive t)
+
+(syd-define-stub
+ syd/yank-buffer-path
+ :desc "Yank buffer path."
+ :interactive t)
+
+(syd-define-stub
+ syd/find-file-in-emacs-user-directory
+ :desc "Find file in `emacs-user-directory'.  See `doom/open-private-config'."
+ :interactive t)
+
+(syd-define-stub
+ syd/open-this-file-as-root
+ :desc "Open current file as root.  See `doom/sudo-this-file'."
+ :interactive t)
+
+(syd-define-stub
+ syd/find-file-as-root
+ :desc "Open current file as root.  See `doom/sudo-this-file'."
+ :interactive t)
+
+(provide 'syd-file)

users/crumb/programs/emacs/lib/syd-prelude.el

@@ -1,6 +1,6 @@
 ;;; syd-prelude.el -*- lexical-binding: t; -*-
 
-;; (eval-when-compile (require 'cl-lib))
+(eval-when-compile (require 'cl-lib))
 
 (defvar syd-data-dir
   (or (getenv "EMACS_DATA_DIR")
@@ -11,6 +11,14 @@
   (or (getenv "EMACS_CACHE_DIR")
       (error "Need $EMACS_CACHE_DIR")))
 
+(cl-defmacro syd-define-stub
+    (name &key (desc "implement me!") interactive)
+  (let ((todo (format "%s: TODO: %s" name desc)))
+    `(defun ,name (&rest args)
+       ,@(if interactive (list '(interactive)) nil)
+       ,todo
+       (error ,todo))))
+
 ;; `on.el' provies a collection of utility hooks and functions ported from Doom
 ;; Emacs.  The hooks make it easier to speed up Emacs startup by providing
 ;; finer-grained control of the timing at which packages are loaded.

users/crumb/programs/emacs/lib/syd-window.el

@@ -0,0 +1,28 @@
+;;; syd-window.el -*- lexical-binding: t; -*-
+
+(syd-define-stub
+ syd/window-swap-left
+ :desc "Select left window."
+ :interactive t)
+
+(syd-define-stub
+ syd/window-swap-down
+ :desc "Select down window."
+ :interactive t)
+
+(syd-define-stub
+ syd/window-swap-up
+ :desc "Select up window."
+ :interactive t)
+
+(syd-define-stub
+ syd/window-swap-right
+ :desc "Select right window."
+ :interactive t)
+
+(syd-define-stub
+ syd/window-maximise
+ :desc "Maximise window"
+ :interactive t)
+
+(provide 'syd-window)