src/webui/devvars.lisp

   1
   2 ;;; Load main dev vars
   3 (load (make-pathname :directory '(:relative "src")
   4                      :name "devvars" :type "lisp"))
   5
   6 (in-package :lineal.devvars)
   7
   8 ;;; Add webui-specific stuff to list of program files.
   9 (setq
  10   *file-tree*
  11   (nconc *file-tree*
  12          '(("webui" "webvars";<  :lineal.webui
  13             :lineal.webui "compile-ps" "index"
  14             "matrixui" "calcupage-buttons" "calcupage"
  15             "save-restore" "reload"))))
  16
  17 ;;; Set any user-defined preferences specific to the web server.
  18 (load (make-pathname :directory '(:relative "src" "webui")
  19                      :name "config" :type "lisp"))
  20
  21 ;;; Saddle up and start riding.
  22 (load (make-pathname :directory '(:relative "src" "webui")
  23                      :name "serv" :type "lisp"))
  24