add some dired functions

	modified:   .emacs