Permalink
Browse files

Grand oyako refactor (not done)

  • Loading branch information...
1 parent feb7e57 commit 9981d33559bb5868f6ceb40641f40515b21f8239 @cdaddr committed Jun 21, 2010
Showing with 482 additions and 542 deletions.
  1. +1 −0 .gitignore
  2. +2 −0 src/blog/config.clj
  3. +119 −238 src/blog/db.clj
  4. +8 −14 src/blog/db/postgres.clj
  5. +3 −2 src/blog/error.clj
  6. +122 −0 src/blog/html.clj
  7. +34 −37 src/blog/layout.clj
  8. +6 −6 src/blog/link.clj
  9. +6 −1 src/blog/middleware.clj
  10. +90 −169 src/blog/pages.clj
  11. +17 −14 src/blog/rss.clj
  12. +70 −59 src/blog/server.clj
  13. +4 −2 src/blog/util.clj
View
@@ -1 +1,2 @@
lib
+pom.xml
View
@@ -26,6 +26,8 @@
(def DEFAULT-COMMENT-AUTHOR "Anonymous Cow")
(def POSTS-PER-PAGE 10)
+(defn page-offset [page-number]
+ (* (dec page-number) POSTS-PER-PAGE))
(def TAG-CATEGORY-REGEX #"^[-A-Za-z0-9_. ]+$")
(def TAG-CATEGORY-URL-REGEX #"^[a-z0-9_-]+$")
Oops, something went wrong.

0 comments on commit 9981d33

Please sign in to comment.