#!/bin/sh
# Here's a tree script pulled a long time ago.  I think it
# was written by Tom Christiansen, but I'm not 100% sure.

if ["${1}" == ""]; then
  set `pwd`
fi
echo $1; find $1 -type d -print | tr / \\1 | sort -f | tr \\1 / |\
sed -e s,\^$1,, -e /\^$/d -e "s,[^/]*/\\([^/]*\\)\$, \`-----\\1," -e "s,[^/]*/, |     ,g"