;;; -*- mode: Lisp; Syntax: Common-Lisp; -*-
;;;
;;; Copyright (c) 2009 by the authors.
;;;
;;; See LICENCE for details.

(in-package :hu.dwim.blog)

(def file-serving-entry-point *blog-application* "static/blog/" (system-relative-pathname :hu.dwim.blog "www/"))

(def entry-point (*blog-application* :path "")
  (with-entry-point-logic (:ensure-session #t :ensure-frame #t)
    (make-frame-root-component-rendering-response)))