From 3612d9ed1858db744cb7bfe744060b127b53b1aa Mon Sep 17 00:00:00 2001
From: Brit Butler <redline6561@gmail.com>
Date: Sat, 15 Sep 2012 17:39:00 -0400
Subject: [PATCH] Cleanup packages.

---
 plugins/disqus.lisp  | 7 ++++---
 plugins/mathjax.lisp | 9 +++++++--
 2 files changed, 11 insertions(+), 5 deletions(-)

diff --git a/plugins/disqus.lisp b/plugins/disqus.lisp
index 36f9545..66a358c 100644
--- a/plugins/disqus.lisp
+++ b/plugins/disqus.lisp
@@ -1,5 +1,6 @@
 (defpackage :coleslaw-disqus
-  (:use :cl :coleslaw))
+  (:use :cl)
+  (:import-from :coleslaw #:add-injection))
 
 (in-package :coleslaw-disqus)
 
@@ -21,5 +22,5 @@
      <a href=\"http://disqus.com\" class=\"dsq-brlink\">comments powered by <span class=\"logo-disqus\">Disqus</span></a>")
 
 (defun enable (&key shortname)
-  (coleslaw:add-injection (list (format nil *disqus-header* shortname)
-                                (lambda (x) (typep x post))) :head))
+  (add-injection (list (format nil *disqus-header* shortname)
+                       (lambda (x) (typep x post))) :head))
diff --git a/plugins/mathjax.lisp b/plugins/mathjax.lisp
index 0ab1896..4bb23d3 100644
--- a/plugins/mathjax.lisp
+++ b/plugins/mathjax.lisp
@@ -1,5 +1,10 @@
 (defpackage :coleslaw-mathjax
-  (:use :cl :coleslaw))
+  (:use :cl)
+  (:import-from :coleslaw #:add-injection
+                          #:post
+                          #:index
+                          #:post-tags
+                          #:index-posts))
 
 (in-package :coleslaw-mathjax)
 
@@ -21,4 +26,4 @@ src=\"http://cdn.mathjax.org/mathjax/latest/MathJax.js?config=TeX-AMS-MML_HTMLor
              (etypecase content
                (post (math-post-p content))
                (index (some #'math-post-p (index-posts content))))))
-    (coleslaw:add-injection (list *mathjax-header* #'mathjax-p) :head)))
+    (add-injection (list *mathjax-header* #'mathjax-p) :head)))