diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-06-01 15:40:15 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-06-01 15:40:15 +0200 |
| commit | 8f2cd195e18f7c26345dfd701216affcd1fdbcd6 (patch) | |
| tree | a497d0f9231db1d86c2ca096668e37e69ff33007 /module/entry-points/server.scm | |
| parent | Extend and document benchmark main. (diff) | |
| download | calp-8f2cd195e18f7c26345dfd701216affcd1fdbcd6.tar.gz calp-8f2cd195e18f7c26345dfd701216affcd1fdbcd6.tar.xz | |
Remove *TOP* tags from descriptions.
Diffstat (limited to 'module/entry-points/server.scm')
| -rw-r--r-- | module/entry-points/server.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/module/entry-points/server.scm b/module/entry-points/server.scm index ceefc5b9..b2716c15 100644 --- a/module/entry-points/server.scm +++ b/module/entry-points/server.scm @@ -175,10 +175,10 @@ (define options '((port (value #t) (single-char #\p) - (description (*TOP* "Bind to TCP port, defaults to " (i 8080) "."))) + (description "Bind to TCP port, defaults to " (i 8080) ".")) (addr (value #t) - (description (*TOP* "Address to use, defaults to " (i "0.0.0.0") - " for IPv4, and " (i "::") " for IPv6.")) + (description "Address to use, defaults to " (i "0.0.0.0") + " for IPv4, and " (i "::") " for IPv6.") ) ;; TODO numbers as single-char seems to not work. (six (single-char #\6) |