extlst "File Extensions"
cntlst "# of occurrences"
10
- '(lambda (a b) (> (cdr a) (cdr b))))
+ (lambda (a b) (> (cdr a) (cdr b))))
))
(defun chart-space-usage (d)
nmlst "File Name"
cntlst "File Size"
10
- '(lambda (a b) (> (cdr a) (cdr b))))
+ (lambda (a b) (> (cdr a) (cdr b))))
))
(defun chart-emacs-storage ()
nmlst "User Names"
cntlst "# of occurrences"
10
- '(lambda (a b) (> (cdr a) (cdr b))))
+ (lambda (a b) (> (cdr a) (cdr b))))
))