extract

[Martin Krischik]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hello,

I am just creating my first Portfile (after having used RPM before) -  
and I already run into trouble. I hope I can solve it by myself using.

However if the maintainer of MacPort could integrate my trusted Unpack  
function right into port itself that that would be a far more elegant  
solution to the problem at hand:

function Unpack ()										# {{{1
	{
	local in_File=${1};
	local in_Dir=${2};
	local Retval=1;

	if	test   -z ${in_Dir} ||
		test ! -d ${in_Dir}
	then
		case "${in_File}" in
			(*.tgz|*.tar.gz)
				%{__tar} --extract --gzip --file "${in_File}";
			;;
			(*.tar.bz2)
				%{__tar} --extract --bzip2 --file "${in_File}";
			;;
			(*.zip)
				unzip -oq "${in_File}" -d "${in_Dir}"
			;;
		esac;

		Retval=0;
	fi;

	return ${Retval};
	}													# }}}1

Its bash/zsh of course but I would be disappointed if tcl could not do  
the same.

Regards

Martin
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.8 (Darwin)

iD8DBQFIj2I+ijwKaHyem9cRAl6gAJ9eG1CdE+M0eFVcSMi1FKjxWhb8pQCg0iVV
i6/Yi3rf3+jXBBdRQjmDcEk=
=6PcQ
-----END PGP SIGNATURE-----