Flexible Lisp Blogware. Fork for personal use. Mirrored from https://github.com/kingcons/coleslaw originally.

config.lisp 431B

123456789101112
  1. (in-package :coleslaw)
  2. (defparameter *credentials* nil
  3. "A map of names to credentials, potentially an alist. Names should be
  4. keywords or symbols, credentials should be dotted pairs.")
  5. (defgeneric get-credentials (name)
  6. (:documentation "Retrieve the credentials keyed by NAME from *credentials*."))
  7. (defgeneric set-credentials (name credentials)
  8. (:documentation "Store the given CREDENTIALS in *credentials* under NAME."))