acdw
/
nef
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Shorten

This commit is contained in:
Case Duckworth 2021-02-04 12:31:19 -06:00
parent e22c231f9f
commit 9ae2eef082
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
nef
View File

@ -1,9 +1,9 @@
#!/bin/sh
rm -r O;mkdir O;cp -r S O;alias P=echo T=sed\ q
X()(eval "$(P 'cat<<.';cat;P;P .)");[ -x H ]&&H=./H||H=H
H()(awk -F\\n -vRS='' '!/^<.*>$/{$0="<p>"$0"</p>"}{print}')
[ -f L ]||P '<!DOCTYPE html><title>$(T $F)</title>
<style>body{max-width:70ch;padding:1%}</style>
<h1>$(T $F)</h1>$(sed 1d $F|X|$H)<hr>/ $(for P in I/*;do
[ $P = $F ]||(N=${P#I/};P "<a href=./${N%.*}>$(T $P)</a> ")
done)'>L;for F in I/*;do N=${F#I/};X<L>O/${N%.*};done
#!/bin/sh -C
rm -r O;mkdir O;cp -r S O;alias P=echo
P>G 'X()(eval "$(P "cat<<.";cat;P;P .)")
for F;do X<L>O/${F#I};done'
P>R '!/^<.*>$/{$0="<P>"$0}1'
P>L '<!DOCTYPE html><title>`sed q $F`</title>
`sed 1d $F|X|awk -vRS= -fR`<hr>$(for P in I/*
do P "<a href=.${P#I/}>`sed q $P`</a>";done)'
. ./G