X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Flogging%2Fserver%2Fserver.factor;h=848ad5d40e8d160b8001d780c4ff3e7b189b5e74;hp=8374ab421bd214dfcd4ea71c0ee3b8815a923bd4;hb=3f3d57032bf29190e9bee12d168a4bce6d74653c;hpb=cd1bb8f4c8afba318249c7b756a45aa1c46ea51e diff --git a/basis/logging/server/server.factor b/basis/logging/server/server.factor index 8374ab421b..848ad5d40e 100644 --- a/basis/logging/server/server.factor +++ b/basis/logging/server/server.factor @@ -74,7 +74,7 @@ CONSTANT: keep-logs 10 over exists? [ move-file ] [ 2drop ] if ; : advance-log ( path n -- ) - [ 1- log# ] 2keep log# ?move-file ; + [ 1 - log# ] 2keep log# ?move-file ; : rotate-log ( service -- ) dup close-log