public
Description: Simple blog application in common lisp using the framework Weblocks
Homepage: http://obakechan.net/lisp/blog-app/
Clone URL: git://github.com/evanmonroig/cl-blogapp.git
cl-blogapp / blog-record-v0.lisp
100644 24 lines (16 sloc) 0.506 kb
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
(in-package :cl-user)
 
;;;; blog-v0: Start up
 
;;;; Follow
;;;; http://trac.common-lisp.net/cl-weblocks/wiki/UserManual#BreakingtheIce
;;;; and start a "blog" project
;;;;
;;;; In the REPL
 
(asdf:operate 'asdf:load-op :weblocks)
 
(asdf:operate
 'wop:make-app-op :weblocks
 :name 'blog
 :target "/home/evan/Documents/projects/info/lisp/webapps/")
 
(push #p"/home/evan/Documents/projects/info/lisp/webapps/blog/"
      asdf:*central-registry*)
 
(asdf:operate 'asdf:load-op :blog)
 
(blog:start-blog :debug t)