[elpa] externals/disk-usage f35eb8b 26/48: Refactor disk-usage-toggle-recursive

[Stefan Monnier]

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

    Refactor disk-usage-toggle-recursive
---
 disk-usage.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/disk-usage.el b/disk-usage.el
index 14d9718..9856d5d 100644
--- a/disk-usage.el
+++ b/disk-usage.el
@@ -160,9 +160,10 @@ It takes the directory to scan as argument."
 (defun disk-usage-toggle-recursive ()
   "Toggle between hierarchical and flat view."
   (interactive)
-  (if (eq disk-usage-list-function #'disk-usage--list)
-      (setq disk-usage-list-function #'disk-usage--list-recursively)
-    (setq disk-usage-list-function #'disk-usage--list))
+  (setq disk-usage-list-function
+        (if (eq disk-usage-list-function #'disk-usage--list)
+            #'disk-usage--list-recursively
+          #'disk-usage--list))
   (tabulated-list-revert))
 
 (defun disk-usage--total (listing)