%{ # XXX This should be moved to apps/dirdir/, and we should bail out if not called from a dir with $enable_wiki set. get_post_args edit_wiki_page edit_text edit_preview edit_save # XXX SECURITY HOLE! should sanitize form input and make sure we only edit files we are allowed # This is a start, but should be way more careful edit_file = `{echo $sitedir/$edit_wiki_page.md|sed 's/\.\.*/./g'} if (~ $"edit_save '') { %}

Editing %($edit_wiki_page%)


%{ if(~ $#edit_text 0 && test -f $edit_file) cat $edit_file | escape_html if not echo $edit_text | escape_html %}
DirDir documents are written using Markdown syntax.
% } % if(! ~ $"edit_preview '') {

Preview:

% echo $edit_text | $formatter


% } % if not if(! ~ $"edit_save '') { %{ dirdir_dir = $edit_file^'_werc/dirdir/' if(! test -d $dirdir_dir) mkdir -p $dirdir_dir dirdir_verdir = $dirdir_dir/`{date -n}^/ mkdir $dirdir_verdir echo $loggin_user > $dirdir_verdir/author echo $edit_text > $dirdir_verdir/data echo $edit_text > $edit_file %}

Saved %($edit_wiki_page%)!

% }