1
0
Fork 0
Commit graph

17 commits

Author SHA1 Message Date
Andy Wingo
974bdce47d update to use (tekuti match-bind)
* tekuti/comment.scm:
* tekuti/filters.scm:
* tekuti/git.scm:
* tekuti/post.scm:
* tekuti/request.scm:
* tekuti/util.scm: Update to use (tekuti match-bind).
2010-11-13 18:47:03 +01:00
Andy Wingo
11eed1fbc8 spam spam spam
* tekuti/comment.scm (bad-number?, *new-comment-spec*):
* tekuti/page-helpers.scm (comment-form): Lame spam obfuscation.

* tekuti/util.scm (emailish?): Allow _ in the before-@ part of the url.
  (urlish?): Don't require a slash after the host.
2008-03-11 23:58:12 +01:00
Andy Wingo
c0f32d5484 comment deletion, post editing.
* tekuti/comment.scm (make-new-comment): Refactor to decouple comment.scm
  from post.scm.

* tekuti/git.scm (run): Generalize so it can run any executable.
  (git-ls-tree, git-ls-subdirs): Check for a #f treeish, return directly
  in that case, avoiding tracebacks in the forked kid.
  (git-mktree): Return #f if the tree is empty.
  (git-rev-list): New command, something like git log.
  (patch-blob): New function; unused, though. Perhaps I should just
  delete it.
  (git-commit-reverse-operations): New function, constructs munge-tree
  operations to revert a commit.
  (git-revert): New operator, reverts a commit. Can't use git's revert
  because it requires a working tree.
  (munge-tree): Rewrite to unify the various commands, and process the
  commands in order. Makes a bit more garbage, but is much more
  understandable.

* tekuti/page-helpers.scm (post-editing-form): Add a preview.
  (admin-post-url): New helper.
  (redirect): New helper.
  (admin-post-redirect): New helper.

* tekuti/page.scm (page-admin): Show recent changes in the sidebar.
  (page-admin-new-post): Redirect to the new post.
  (page-new-comment): Rework for make-new-comment changes, and redirect
  to the post. Would be nice to redirect to the comment though.
  (page-admin-changes): New page, lists recent changes.
  (page-admin-change): New page, shows a change, allowing it to be
  undone.
  (page-admin-revert-change): New page, actually reverts a change. Thus
  we have comment deletion.

* tekuti/post.scm (munge-post): New helper, factored out of
  make-new-post.
  (parse-post-data): Another new helper. Needs to do more validation,
  though.
  (modify-post): Post editing, yay!

* tekuti/request.scm (parse-www-form-urlencoded): Factored out of
  request-form-data.
  (*request-initializers*): Initialize 'query to have the parsed query
  string data.

* tekuti/url.scm (url:path-part, url:query-part): New somewhat hacky
  functions. url.scm needs some love.
  (url:path-split): Split on only the "path part" of the URL.

* tekuti/util.scm (foldn): New export. Probably a bad idea.
  (match-case): New macro, not used though.
  (string-split/trimming): New util.

* tekuti/web.scm (choose-handler): Update the set of pages.
2008-03-07 13:09:47 +01:00
Andy Wingo
579a5d7ae4 various fixes, new post support
* tekuti/comment.scm (make-new-comment): Better commit log for comments.

* tekuti/git.scm (munge-tree): Fix when creating multiple files in a new
  directory.

* tekuti/page-helpers.scm (with-authentication): Resurrect, this got lost
  somehow, in that past time place.
  (post-editing-form): Frobate a bit.
  (admin-post-link): Fix.

* tekuti/page.scm (page-admin): Frobate.
  (page-admin-post): Fix for recent change in post-from-key.
  (page-admin-new-post): Sortof works, needs some fixage.

* tekuti/post.scm (make-new-post): Implement, yay

* tekuti/util.scm (timestamp->date): New function

* tekuti/web.scm (*status-names*): add 303
2008-03-04 23:15:38 +01:00
Andy Wingo
c2446d0f7f more cleanups 2008-02-29 13:38:07 +01:00
Andy Wingo
dbed5b113d cleanups, refactorings, what-not 2008-02-29 00:32:49 +01:00
Andy Wingo
0280eb9bd0 more cleanups, xhtml sanitization thanks to MikeS, --repl 2008-02-28 22:14:42 +01:00
Andy Wingo
436ef22134 continuing simplification work 2008-02-28 14:28:38 +01:00
Andy Wingo
227bc9cea1 incremental reindexing, import charset fixes, other thingies 2008-02-27 21:42:10 +01:00
Andy Wingo
caf9618312 atom feed maybe working 2008-02-24 21:21:41 +01:00
Andy Wingo
85b09abad7 using new one-file-per-comment 2008-02-23 23:58:55 +01:00
Andy Wingo
77509e4d3f basic archives done 2008-02-22 18:20:41 +01:00
Andy Wingo
ca585c382f new clever indexing scheme 2008-02-22 12:57:18 +01:00
Andy Wingo
0b476a921d another checkpoint, la la la 2008-02-21 23:48:44 +01:00
Andy Wingo
c2580a017d snapshot 2008-02-19 08:58:16 +01:00
Andy Wingo
fa7cc3f267 hold metadata in memory instead of in git 2008-02-12 23:28:44 +01:00
Andy Wingo
da58b95476 modularization 2008-02-11 22:58:10 +01:00