function emacscd { export EMACS_DIR_FILE=$HOME/.emacs.dir.$$ emacs . if [ -f $EMACS_DIR_FILE ]; then cd `cat $EMACS_DIR_FILE` rm -f $EMACS_DIR_FILE fi } (defun dired-set-current-dir-and-exit() "Set viewing directory to the current director…