commit 5fd59258dca20b0c155aa8c28d443a2e608219fb
from: rsc <devnull@localhost>
date: Wed Aug 31 03:56:50 2005 UTC

Use Plan 9 file(1).

commit - e8dc77f7ae8ae6f9c7b4667b05cac03a11c17522
commit + 5fd59258dca20b0c155aa8c28d443a2e608219fb
blob - 450c3b47d6283fcae503137e84476bd2ae8251f4
blob + 03987627a43c55e0c1459e6870731e5dcf6c5a4c
--- bin/src
+++ bin/src
@@ -10,9 +10,9 @@ fn dbsrc{
 }
 
 fn go{
-	type=`{file $1}
+	type=`{9 file $1}
 	switch($type){
-	case *'script text'*
+	case *script*
 		plumbit $1 '(script)'
 	case *executable* *'plan 9 boot image'* *'shared object'*
 		plumbit  `{dbsrc $1} '(executable)'