fix logging

diff --git a/basis/logging/server/server.factor b/basis/logging/server/server.factor
index d13ae616be54bdb1a25f4c59756191f68a29e943..47656e86555d0476580c6b396e83e81312345424 100644 (file)
--- a/basis/logging/server/server.factor
+++ b/basis/logging/server/server.factor
@@ -83,7 +83,7 @@ SYMBOL: log-files
 \r
 : (rotate-logs) ( -- )\r
     (close-logs)\r
-    log-root directory [ drop rotate-log ] assoc-each ;\r
+    log-root directory-files [ rotate-log ] each ;\r
 \r
 : log-server-loop ( -- )\r
     receive unclip {\r