whistle/packages.lisp at master · gigamonkey/whistle · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
;;; Copyright (c) 2011, Peter Seibel.
;;; All rights reserved. See COPYING for details.

(in-package :cl-user)

(defpackage :whistle
  (:use :cl
        :toot
        :com.gigamonkeys.utilities
        :com.gigamonkeys.pathnames
        :cl-ppcre)
  (:import-from :alexandria :once-only :with-unique-names :ends-with)

  ;; FIXME: Need to re-export symbols from :toot as well as a number
  ;; of symbols from :whistle
  (:export
   :start-whistle
   :stop-whistle
   :find-server
   :generate-response
   :find-handler
   :register-plugin
   :add-url
   :with-parameters))

(defpackage :whistle-config
  (:use :cl)

  (:export
   :port
   :logs
   :data
   :protections
   :redirects
   :urls
   :url
   :passwords
   :include
   :plugin
   :handlers))