q/thirdculture-werc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

New api to allow 'synthetic' dirs, only for sidebar for now.

Browse source
This commit is contained in:
Uriel 2009-03-08 23:58:49 +01:00
parent 3a5298bd38
commit b1df2966e3
1 changed files with 9 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

11
bin/corehandlers.rc
View file

@ -1,13 +1,20 @@
# Werc builtin handlers # Werc builtin handlers
# API
fn add_synth_paths {
synth_paths=($synth_paths $conf_wd^$*)
}
fn nav_tree { fn nav_tree {
if(! ~ $#sideBarNavTitle 0) if(! ~ $#sideBarNavTitle 0)
echo '<p class="sideBarTitle">'$"sideBarNavTitle':</p>' echo '<p class="sideBarTitle">'$"sideBarNavTitle':</p>'
# Ignore stderr, last path element might be a file that doesn't exist (eg., foo for foo.md) # Ignore stderr, last path element might be a file that doesn't exist (eg., foo for foo.md)
# /./ to deal with p9p's ls failure to follow dir symlinks otherwise # /./ to deal with p9p's ls failure to follow dir symlinks otherwise
ls -F $sitedir/./$req_paths_list >[2]/dev/null \ ls -F $sitedir/./$req_paths_list >[2]/dev/null \
| sed $dirfilter'/\/[^_.\/][^\/]*(\.(md|txt|html)|\/)$/!d; s!^'$sitedir'!!; '$dirclean \ | {
| sort -u | awk -F/ ' sed $dirfilter'/\/[^_.\/][^\/]*(\.(md|txt|html)|\/)$/!d; s!^'$sitedir'!!; '$dirclean
if(! ~ $#synth_paths 0) echo $synth_paths | tr ' ' $NEW_LINE
} | sort -u | awk -F/ '
function p(x, y, s) { for(i=0; i < x-y; i+=1) print s } function p(x, y, s) { for(i=0; i < x-y; i+=1) print s }
BEGIN { lNF=2; print "<ul>" } BEGIN { lNF=2; print "<ul>" }
{ {