Add draft restructured-text plugin, minor heroku cleanup.

This commit is contained in:
Brit Butler 2013-01-29 20:38:16 -05:00
parent 87b85b1d29
commit d256db6bbc
3 changed files with 12 additions and 4 deletions

View file

@ -1,5 +1,5 @@
(eval-when (:compile-toplevel :load-toplevel) (eval-when (:compile-toplevel :load-toplevel)
(ql:quickload '(hunchentoot))) (ql:quickload 'hunchentoot))
(defpackage :coleslaw-heroku (defpackage :coleslaw-heroku
(:use :cl) (:use :cl)

View file

@ -1,2 +0,0 @@
(in-package :coleslaw)

View file

@ -2,6 +2,16 @@
(ql:quickload 'docutils)) (ql:quickload 'docutils))
(defpackage :coleslaw-rst (defpackage :coleslaw-rst
(:use :cl :coleslaw)) (:use :cl)
(:import-from :coleslaw #:render-content)
(:import-from :cl-docutils #:read-rst
#:write-html)
(:export #:enable))
(in-package :coleslaw-rst) (in-package :coleslaw-rst)
(defmethod render-content (text (format (eql :rst)))
(with-output-to-string (str)
(write-html str (read-rst text))))
(defun enable ())