finding the biggest subdirectories of the current directory

There's probably an easier way to do this, but I just put this in my aliases and it works well enough.

alias fl='(for file in `find .??* * -maxdepth 0 -type d`; do du -hs $file 2>/dev/null; done) |sort -h -k 1'