qbit/werc
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Limite the length of descs and factor into sep function

Browse Source
This commit is contained in:
uriel 2007-06-24 01:21:17 +02:00
parent f2322b4cb1
commit 361c30c589
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
pub/sitemap.tpl
View File

@ -7,6 +7,10 @@ cpath = ''
rpath = `{pwd}
rpath = $rpath^'/'^$sitedir
fn getMdDesc {
sed 's/^(.......................................................................................................[^ ]*).*$/\1/g; 1q' < $1
}
fn listDir {
cd $1
dirfilter = $saveddf
@ -14,17 +18,17 @@ fn listDir {
. _config
echo '<ul>'
for ( i in `{ls -d */ *.md *.html >[2] /dev/null |sed $dirfilter^'/index$/d;' } ) {
for ( i in `{ ls -d */ *.md *.html >[2]/dev/null |sed $dirfilter^'/index$/d;' } ) {
cpath = `{ pwd | sed 's,^'^$"rpath/?^',,; s,//*,/,;' }
if( ~ $#cpath 0 )
cpath = ''
desc = ''
if (test -f $i.md) {
desc = `{ sed 1q < $i.md }
desc = `{ getMdDesc $i.md }
}
if (test -f $i/index.md) {
desc = `{ sed 1q < $i/index.md }
desc = `{ getMdDesc $i/index.md }
}
if (test -f $i.html) {
# H1 is not reliable because htmlroff doesn't use it :(