summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJSDurand <mmemmew@gmail.com>2021-03-01 13:51:32 +0800
committerJSDurand <mmemmew@gmail.com>2021-03-01 13:51:32 +0800
commit1ee48cb1e55b08bb3ec402374afb4c59346a35ed (patch)
tree1fa0b4c32687e187c696c583bd36cf3a1aca1aa6
parent0062c1cf5df981e570c87c83faf11fd607b05356 (diff)
Refine durand-view-process
The function list-processes is really useful.
-rw-r--r--view-conf.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/view-conf.el b/view-conf.el
index bed8495..9d1ea5f 100644
--- a/view-conf.el
+++ b/view-conf.el
@@ -83,9 +83,12 @@ If ARG is '(16), view the battery information."
(defun durand-view-process (&optional arg)
"View the list of processes"
(interactive "P")
- (if arg
- (proced)
- (message "%s" (process-list))))
+ (cond
+ ((equal arg (list 4))
+ (list-processes))
+ ((equal arg (list 16))
+ (proced))
+ ((message "%s" (process-list)))))
;;; My map for viewing