7 " Function to check that executing "cmd [-f]" works.
8 " The result is cached in s:have_"cmd" for speed.
9 fun s:check(cmd)  argument
10   let name = substitute(a:cmd, '\(\S*\).*', '\1', '')
44 " After reading compressed file: Uncompress text in buffer with "cmd"
45 fun gzip#read(cmd)  argument
46   " don't do anything if the cmd is not supported
47   if !s:check(a:cmd)
53   if a:cmd[0] == 'g'
89   call system(a:cmd . " " . s:escape(tmpe))
153 " After writing compressed file: Compress written file with "cmd"
154 fun gzip#write(cmd)  argument
157   " don't do anything if the cmd is not supported
158   elseif s:check(a:cmd)
164 	call system(a:cmd . " " . b:gzip_comp_arg . " -- " . s:escape(nmt))
166 	call system(a:cmd . " -- " . s:escape(nmt))
173 " Before appending to compressed file: Uncompress file with "cmd"
174 fun gzip#appre(cmd)  argument
175   " don't do anything if the cmd is not supported
176   if s:check(a:cmd)
181     if a:cmd[0] == 'g'
191 	call system(a:cmd . " -c -- " . s:escape(nmte) . " > " . s:escape(nmt))
194 	call system(a:cmd . " -- " . s:escape(nmte))