28 lines
865 B
EmacsLisp
28 lines
865 B
EmacsLisp
;;; syd-prelude.el -*- lexical-binding: t; -*-
|
|
|
|
(eval-when-compile (require 'cl-lib))
|
|
|
|
(defvar syd-data-dir
|
|
(or (getenv "EMACS_DATA_DIR")
|
|
(error "Need $EMACS_DATA_DIR"))
|
|
"Directory analogous to XDG_DATA_HOME for miscellaneous Emacs things.")
|
|
|
|
(defvar syd-cache-dir
|
|
(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.
|
|
(use-package on)
|
|
|
|
(provide 'syd-prelude)
|