--- cleanlinks.old	2005-11-18 21:12:15.000000000 -0800
+++ cleanlinks	2005-11-18 21:14:33.000000000 -0800
@@ -12,8 +12,8 @@
 find . -type l -print |
 (
 	read i
-	while [ X"$i" != X ]; do
-		if [ ! -f "$i" ]; then
+	while [ ! -z "$i" ]; do
+		if [ ! -e "$i" ]; then
 			echo $i is a dangling symlink, removing
 			rm -f "$i"
 		fi
@@ -23,5 +23,5 @@
 
 echo Removing empty directories ...
 #find . -type d -depth -print | xargs rmdir > /dev/null 2>&1
-find . -type d -depth -empty -print -exec rmdir {} \;
+find . -depth -type d -empty -print -exec rmdir {} \;
 exit 0