o5r/plan9port
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Use Plan 9 file(1).

Browse source
This commit is contained in:
rsc 2005-08-31 03:56:50 +00:00
parent e8dc77f7ae
commit 5fd59258dc
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
bin/src
View file

@ -10,9 +10,9 @@ fn dbsrc{
} }
fn go{ fn go{
type=`{file $1} type=`{9 file $1}
switch($type){ switch($type){
case *'script text'* case *script*
plumbit $1 '(script)' plumbit $1 '(script)'
case *executable* *'plan 9 boot image'* *'shared object'* case *executable* *'plan 9 boot image'* *'shared object'*
plumbit `{dbsrc $1} '(executable)' plumbit `{dbsrc $1} '(executable)'