changelog shortlog tags branches changeset files revisions annotate raw help

Mercurial > hg > plan9front / rc/bin/wurl2txt

changeset 7243: 34f64dcbbc25
parent: efddda59690a
author: cinap_lenrek@felloff.net
date: Fri, 17 May 2019 18:14:10 +0200
permissions: -rwxr-xr-x
description: 7l: don't hardcode 4k pagesize, use INITRND
1 #!/bin/rc
2 
3 switch($#*){
4 case 0
5  exit
6 case 1
7  name = /`{echo $1 | sed 's;.*//;;
8  s;/.*;;'}^/webpage
9  # send hget errors to 2 so they appear in window
10  hget $1 >[2=1]| {echo $1; echo; htmlfmt} >[2=1] | plumb -i -d edit -a 'action=showdata filename='$name
11  exit
12 case *
13  for(i in *)
14  wurl2txt $i
15 }