summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-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