hstow: strip leading whitespace from one case of output from wc(1)

Thanks to Mike Lee Williams for reporting the problem.

1 files changed, 1 insertions, 1 deletions

diff --git a/bin/hstow b/bin/hstow
index f05f0aaf..8fbec796 100755
--- a/bin/hstow
+++ b/bin/hstow
@@ -131,7 +131,7 @@ stow () {
 
 unstow () {
     cd "$HOME"
-    dir_pat="^.$(echo $DIR | cut -c$(echo $HOME | wc -m)-)/"
+    dir_pat="^.$(echo $DIR | cut -c$(echo $HOME | wc -m | tr -d ' ')-)/"
     for file in $(find . -type l ! -name . ! -name "$cchars" \
 		      | grep -v "$dir_pat"); do
 	if readlink "$file" | grep -Eq '^(\.\./)*\.STOW/'"$NAME/"; then