[elpa] externals/disk-usage 7fe5f1b 40/48: Fix keymap setup in disk-usage-by-types-mode

[Stefan Monnier]

branch: externals/disk-usage
commit 7fe5f1b90bad5259205b423784cf49b5c8447987
Author: Pierre Neidhardt <address@hidden>
Commit: Pierre Neidhardt <address@hidden>

    Fix keymap setup in disk-usage-by-types-mode
---
 disk-usage.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/disk-usage.el b/disk-usage.el
index 4e6619f..e089196 100644
--- a/disk-usage.el
+++ b/disk-usage.el
@@ -502,12 +502,6 @@ TYPE is the file extension (lower case)."
                                               (format "%.2f"
                                                       
(disk-usage--type-average-size e)))))))))))
 
-(define-derived-mode disk-usage-by-types-mode tabulated-list-mode "Disk Usage 
By Types"
-  "Mode to display disk usage by file types.
-Also see `disk-usage-mode'."
-  (setq tabulated-list-sort-key (cons "Total size" 'flip))
-  (add-hook 'tabulated-list-revert-hook 'disk-usage-by-types--refresh nil t))
-
 (defvar disk-usage-by-types-mode-map
   (let ((map (make-sparse-keymap)))
     (set-keymap-parent map tabulated-list-mode-map)
@@ -516,6 +510,12 @@ Also see `disk-usage-mode'."
     map)
   "Local keymap for `disk-usage-by-types-mode' buffers.")
 
+(define-derived-mode disk-usage-by-types-mode tabulated-list-mode "Disk Usage 
By Types"
+  "Mode to display disk usage by file types.
+Also see `disk-usage-mode'."
+  (setq tabulated-list-sort-key (cons "Total size" 'flip))
+  (add-hook 'tabulated-list-revert-hook 'disk-usage-by-types--refresh nil t))
+
 (defvar disk-usage-by-types-buffer-name "disk-usage-by-types")
 
 ;;;###autoload