summaryrefslogtreecommitdiff
path: root/src/app/portmaster.clj
diff options
context:
space:
mode:
Diffstat (limited to 'src/app/portmaster.clj')
-rw-r--r--src/app/portmaster.clj4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/app/portmaster.clj b/src/app/portmaster.clj
index 1d34c88..3c25176 100644
--- a/src/app/portmaster.clj
+++ b/src/app/portmaster.clj
@@ -83,6 +83,10 @@
[port]
(do-command (str "off " port)))
+(defn set-name
+ [port name]
+ (do-command (str "name " port " " name)))
+
(defn init
[port-name username password]
(let [socat (.. (ProcessBuilder.