Since `find-file' takes an argument, all you have to do is build the
argument using the default path and then pass the argument to
`find-file'.  The way to make this easy is to use `read-file-name'.
E.g. some variant on

(defun find-file-home-directory ()
  (interactive)
  (find-file (read-file-name "File: " "/Users/arided/")))

BTW, I think after you find a file that isn't in the bin dir,
`find-file' will have a new default path.


_______________________________________________
Help-gnu-emacs mailing list
Help-gnu-emacs@gnu.org
http://lists.gnu.org/mailman/listinfo/help-gnu-emacs

Reply via email to