Import sources from 2011-03-30 iso image - rc

1 files changed, 15 insertions, 0 deletions

diff --git a/rc/bin/wurl2txt b/rc/bin/wurl2txt
new file mode 100755
index 000000000..19dad7b6f
--- /dev/null
+++ b/rc/bin/wurl2txt
@@ -0,0 +1,15 @@
+#!/bin/rc
+
+switch($#*){
+case 0
+	exit
+case 1
+	name = /`{echo $1 | sed 's;.*//;;
+		s;/.*;;'}^/webpage
+	# send hget errors to 2 so they appear in window
+	hget $1 >[2=1]| {echo $1; echo; htmlfmt} >[2=1] | plumb -i -d edit -a 'action=showdata filename='$name
+	exit
+case *
+	for(i in *)
+		wurl2txt $i
+}