new scripts
This commit is contained in:
parent
2ce287bb13
commit
3ff9213bcd
7 changed files with 147 additions and 1 deletions
21
bin/spell
Executable file
21
bin/spell
Executable file
|
|
@ -0,0 +1,21 @@
|
|||
#!/usr/local/plan9/bin/rc
|
||||
|
||||
spellflags=()
|
||||
deroffargs=()
|
||||
fflag=''
|
||||
for(x){
|
||||
switch($x){
|
||||
case -[abcvx]
|
||||
spellflags=($spellflags $x)
|
||||
case -f
|
||||
fflag=$x
|
||||
case *
|
||||
if(~ $fflag -f) {
|
||||
spellflags=($spellflags -f $x)
|
||||
fflag=''
|
||||
}
|
||||
if not deroffargs=($deroffargs $x)
|
||||
}
|
||||
}
|
||||
|
||||
deroff -w $deroffargs | sort -u | sprog $spellflags
|
||||
Loading…
Add table
Add a link
Reference in a new issue