30 lines
439 B
Plaintext
30 lines
439 B
Plaintext
options = [
|
|
z
|
|
l
|
|
x
|
|
b
|
|
g
|
|
h
|
|
]
|
|
|
|
description = [
|
|
&z='zst compression (default)'
|
|
&l='lz4 compression'
|
|
&x='xz compression'
|
|
&b='bz2 compression'
|
|
&g='gzip compression'
|
|
&h='display help'
|
|
]
|
|
|
|
fn -options {
|
|
each [o]{
|
|
put [&short=$o &desc=$description[$o]]
|
|
} $options
|
|
}
|
|
|
|
fn complete [@argv]{
|
|
edit:complete-getopt $argv [(-options)] [ $edit:complete-filename~ ...]
|
|
}
|
|
|
|
edit:completion:arg-completer[archiver] = $complete~
|