diff options
author | JSDurand <mmemmew@gmail.com> | 2021-03-01 13:51:32 +0800 |
---|---|---|
committer | JSDurand <mmemmew@gmail.com> | 2021-03-01 13:51:32 +0800 |
commit | 1ee48cb1e55b08bb3ec402374afb4c59346a35ed (patch) | |
tree | 1fa0b4c32687e187c696c583bd36cf3a1aca1aa6 | |
parent | 0062c1cf5df981e570c87c83faf11fd607b05356 (diff) |
Refine durand-view-process
The function list-processes is really useful.
-rw-r--r-- | view-conf.el | 9 |
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 |