;;; 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)