Index: kitcreator
==================================================================
--- kitcreator
+++ kitcreator
@@ -126,11 +126,11 @@
 
 	failed="0"
 	(
 		cd "${pkg}" >/dev/null 2>/dev/null || exit 1
 
-		./build.sh > build.log 2>&1 || exit 1
+		./build.sh 3>&1 4>&2 > build.log 2>&1 || exit 1
 	) || failed="1"
 
 	if [ "${failed}" = "1" ]; then
 		echo " failed."
 		failedpkgs="${failedpkgs} ${pkg}"

Index: tcl/build.sh
==================================================================
--- tcl/build.sh
+++ tcl/build.sh
@@ -99,11 +99,20 @@
 			rm -rf "${workdir}"
 		) || exit 1
 	else
 		if [ ! -d 'buildsrc' ]; then
 			rm -f "${SRC}.tmp"
-			wget -O "${SRC}.tmp" "${SRCURL}" || exit 1
+			wget -O "${SRC}.tmp" "${SRCURL}" || (
+				echo '  Unable to download source code for Tcl.' >&4
+				echo "  Attempted to run:  wget -O \"${SRC}.tmp\" \"${SRCURL}\"" >&4
+				echo "  Got:"
+				wget -O "${SRC}.tmp" "${SRCURL}" 2>&1 | sed 's@^@    @' >&4
+
+				echo '  Aborting Tcl -- further packages will likely also fail.' >&4
+
+				exit 1
+			) || exit 1
 			mv "${SRC}.tmp" "${SRC}"
 		fi
 	fi
 fi