1;;(global-set-key "\C-f" 'find-name-dired)
3(put 'dired-find-alternate-file 'disabled nil)
6;; (load (find-file "~/emacs/lisp/addons/dired+.el"))
9;; (if (require-if-exists 'dired-single)
11;; (defun my-dired-init ()
12;; "Bunch of stuff to run for dired, either immediately or when it's
14;; (define-key dired-mode-map [return] 'joc-dired-single-buffer)
15;; (define-key dired-mode-map [mouse-1] 'joc-dired-single-buffer-mouse)
16;; (define-key dired-mode-map "^"
18;; (lambda nil (interactive) (joc-dired-single-buffer "..")))))
20;; ;; if dired's already loaded, then the keymap will be bound
21;; (if (boundp 'dired-mode-map)
22;; ;; we're good to go; just add our bindings
24;; ;; it's not loaded yet, so add our bindings to the load-hook
25;; (add-hook 'dired-load-hook 'my-dired-init))))
27(global-set-key [(f3)] 'joc-dired-magic-buffer)
28(global-set-key [(control f3)] (function
29 (lambda nil (interactive)
30 (joc-dired-magic-buffer default-directory))))
31(global-set-key [(shift f3)] (function
32 (lambda nil (interactive)
33 (message "Current directory is: %s" default-directory))))
34(global-set-key [(meta f3)] 'joc-dired-toggle-buffer-name)