#! /bin/sh
# bundle: group files into distribution package (K&Pike, p.98)
# recursive version (Ex. 3-17, p.99); only bundles text files (as per file(1))

case $DEJA_VU in
'')
	echo '# To unbundle, sh this file'
	DEJA_VU='done'
	export DEJA_VU
	;;
esac
for file
do
	if test -d $file; then
		echo "mkdir $file 2>/dev/null"
		files="`echo $file/*`"
		case "$files" in
		"$file/*")	;;			# empty directory
		*)	bundle $files	;;
		esac
	else
		case "`file $file`" in
		*" text"*|*" script"*|*" command"*|*empty)
			echo "echo $file 1>&2"
			echo "sed 's/^-//' >$file <<'!'"	# remove guard
			sed 's/^[^A-EG-Za-z0-9]/-&/' $file	# prepend guard
			echo !
			;;
		esac
	fi
done