Slide- - acme - thing1's custom acme build!

Slide- (268B)

      1 #!/home/thing1/git/plan9port/bin/rc
      2 current=`{basename $%}
      3 currentx=`{9 grep -n '^'$current'([ 	]|$)' index | sed 's/:.*//'}
      4 pagex=`{echo $currentx - 1 | hoc}
      5 page=`{sed -n $pagex^p index | awk '{print $1}'}
      6 
      7 if(~ $#page 0) {
      8 	echo no such page
      9 	exit 0
     10 }
     11 
     12 Slide $page