[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[shepherd] 02/05: shepherd: Remove undocumented 'dmd-status' command.
From: |
Ludovic Courtès |
Subject: |
[shepherd] 02/05: shepherd: Remove undocumented 'dmd-status' command. |
Date: |
Tue, 12 Jan 2016 22:28:27 +0000 |
civodul pushed a commit to branch master
in repository shepherd.
commit 4c70ac307e32d5737a318c6bccf6941f730e8511
Author: Ludovic Courtès <address@hidden>
Date: Tue Jan 12 22:17:52 2016 +0100
shepherd: Remove undocumented 'dmd-status' command.
* modules/shepherd.scm (process-command): Remove 'dmd-status' case.
---
modules/shepherd.scm | 10 +---------
1 files changed, 1 insertions(+), 9 deletions(-)
diff --git a/modules/shepherd.scm b/modules/shepherd.scm
index a1b65d2..290f691 100644
--- a/modules/shepherd.scm
+++ b/modules/shepherd.scm
@@ -232,15 +232,7 @@
((start) (apply start service-symbol args))
((stop) (apply stop service-symbol args))
((enforce) (apply enforce service-symbol args))
- ((dmd-status)
- (if (not (null? args))
- (local-output "Too many arguments.")
- (let ((target-services (lookup-running-or-providing
- service-symbol)))
- (if (null? target-services)
- (handle-unknown service-symbol 'action the-action args)
- (for-each dmd-status
- target-services)))))
+
;; Actions which have the semantics of `action' are
;; handled there.
(else (apply action service-symbol the-action args))))