diff options
| author |  Tom Willemsen | 2012-09-10 11:03:49 +0200 |
|---|---|---|
| committer | Tom Willemsen | 2012-09-10 11:03:49 +0200 |
| commit | 5366157a75957579bd4ff6c1aed22ba695febef8 (patch) | |
| tree | 89cd03900f41b4f4d4cf7f4e4071f6903ed55c7b | |
| parent | 4258614af9f6776f3aaa56feab4c78f4b49451ec (diff) | |
| download | tekuti-5366157a75957579bd4ff6c1aed22ba695febef8.tar.gz tekuti-5366157a75957579bd4ff6c1aed22ba695febef8.zip | |
Remove sidebar-ul
| -rw-r--r-- | tekuti/page-helpers.scm | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/tekuti/page-helpers.scm b/tekuti/page-helpers.scm index 2f99117..66a7b42 100644 --- a/tekuti/page-helpers.scm +++ b/tekuti/page-helpers.scm @@ -42,7 +42,7 @@ relurl rellink post-url post-editing-form - sidebar-ul top-tags tag-cloud + top-tags tag-cloud main-sidebar post-sidebar related-tag-cloud post-link admin-post-url admin-post-link show-post with-authentication @@ -219,10 +219,6 @@ (value "delete") (class "btn btn-primary"))))) '()))) -(define (sidebar-ul body) - `(div (@ (id "menu")) - (ul ,@body))) - (define (admin-post-url post) (relurl `("admin" "posts" ,(post-key post)))) |