Changeset 3310

Timestamp:

06/24/08 15:08:33 (7 months ago)

Author:

ksprotte

Message:

A iA bknr/web/src/frontend; start-frontend to lisp-ecoop

Files:

• trunk/bknr/web/src/bknr.web.asd (modified) (2 diffs)
• trunk/bknr/web/src/frontend (added)
• trunk/bknr/web/src/frontend/frontend.lisp (added)
• trunk/bknr/web/src/packages.lisp (modified) (1 diff)
• trunk/projects/lisp-ecoop/src/packages.lisp (modified) (1 diff)
• trunk/projects/lisp-ecoop/src/webserver.lisp (modified) (1 diff)

trunk/bknr/web/src/bknr.web.asd

@@ +1 @@
+;; -*- mode: lisp -*-
-(in-package :cl-user)
-
@@ -94 +95 @@
-                          :depends-on ("sysclasses" "packages"))
-
+                 (:module "frontend" :depends-on ("packages") :components ((:file "frontend")))
+
-                 (:module "rss" :components ((:file "rss")
-                                             (:file "rss-handlers" :depends-on ("rss")))

trunk/bknr/web/src/packages.lisp

@@ -374 +374 @@
-           #:import-handler-import-pathname))
-
+(defpackage :bknr.web.frontend
+  (:use :cl)
+  (:export #:frontend-already-running
+           #:front-end-running-p
+           #:start-frontend
+           #:stop-frontend
+           ))
+
-(defpackage :bknr.images
-  (:use :cl

trunk/projects/lisp-ecoop/src/packages.lisp

@@ -28 +28 @@
-        :bknr.utils
-        :bknr.web
+        :bknr.web.frontend
-        :bknr.datastore
-        :bknr.indices

trunk/projects/lisp-ecoop/src/webserver.lisp

@@ -43 +43 @@
-  (publish-lisp-ecoop)
-  (setf *hunchentoot-default-external-format* (flex:make-external-format :utf-8 :eol-style :lf))
-
+
+