Re: gunzip problem on Windows

[byron . cordova . mora]

El martes, 10 de noviembre de 2009, 9:42:52 (UTC-5), Sébastien Vauban  escribió:
> Eli Zaretskii wrote:
> >> From: Kevin Rodgers <kevin.d.rodgers@gmail.com>
> >>>
> >>> It might work to copy gzip.exe into gunzip.exe.
> 
> Another solution, from the Net (don't know who anymore):
> 
> --8<---------------cut here---------------start------------->8---
>       (require 'dired-aux)
> 
>       (defun dired-call-process (program discard &rest arguments)
>         ;; 09Feb02, sailor overwrite this function because Gnu Emacs cannot
>         ;; recognize gunzip is a symbolic link to gzip. Thus, if the program
>         ;; is "gunzip", replace it with "gzip" and add an option "-d".
> 
>         ;; "Run PROGRAM with output to current buffer unless DISCARD is t.
>         ;; Remaining arguments are strings passed as command arguments to
>         ;; PROGRAM."
>         ;; Look for a handler for default-directory in case it is a
>         ;; remote file name.
>         (let ((handler
>                (find-file-name-handler (directory-file-name default-directory)
>                                        'dired-call-process)))
>           (if handler (apply handler 'dired-call-process
>                              program discard arguments)
>             (progn
>               (if (string-equal program "gunzip")
>                   (progn
>                     (setq program "gzip")
>                     (add-to-list 'arguments "-d")))
>               (apply 'call-process program nil (not discard) nil 
> arguments)))))
> --8<---------------cut here---------------end--------------->8---
> 
> Seb
> 
> -- 
> Sébastien Vauban

#otra forma:
#ver donde esta gzip:
where gzip
#por ejemplo, presentaría:
C:\laragon\bin\git\usr\bin\gzip.exe
C:\Program Files\Git\usr\bin\gzip.exe

#ubicarse, por ejemplo: C:\Program Files\Git\usr\bin
#crear archivo: gunzip.bat
#contenido del bat: 
@echo off
gzip -d -f %1
# guardar y salir
# note: es necesario -f para forzar la descompresion