Re: Doc of keyboard macros

[Juri Linkov]

> M-F7 (in dired-mode-map): grep (from Norton Commander)

Speaking of *Commanders, here are more-less directly corresponding commands:

(define-key dired-mode-map [f3]  'dired-view-file)
(define-key dired-mode-map [f4]  'dired-find-file)
(define-key dired-mode-map [f5]  'dired-do-copy)
(define-key dired-mode-map [f6]  'dired-do-rename)
(define-key dired-mode-map [f7]  'dired-create-directory)
(define-key dired-mode-map [f8]  'dired-do-delete)
(define-key dired-mode-map [f9]  'tmm-menubar)
(define-key dired-mode-map [f10] 'quit-window)

(mapc (lambda (elt)
        (define-key dired-mode-map (car elt)
          `(lambda ()
             (interactive)
             (dired-sort-other (concat dired-listing-switches ,(cadr elt))))))
      '(([(control f3)]       ""     "by name")
        ([(control f4)]       " -X"  "by extension")
        ([(control f5)]       " -t"  "by time")
        ([(control f6)]       " -S"  "by size")
        ([(control shift f3)] " -r"  "by reverse name")
        ([(control shift f4)] " -rX" "by reverse extension")
        ([(control shift f5)] " -rt" "by reverse time")
        ([(control shift f6)] " -rS" "by reverse size")))

(define-key dired-mode-map [insert] 'dired-mark)
(define-key dired-mode-map [kp-add] 'dired-mark-files-regexp)
(define-key dired-mode-map [kp-multiply] 'dired-toggle-marks)

(define-key dired-mode-map [(meta f7)] 'rgrep)

(define-key dired-mode-map [(shift control ?u)] 'window-swap-states)

(define-key dired-mode-map [(shift f5)] 'dired-du-count-sizes)

PS: dired-du-count-sizes from bug#22829 might need caching like in
http://invisible-island.net/ded/ded.html#dtree_caching