Index: msg.fs ================================================================== --- msg.fs +++ msg.fs @@ -1431,11 +1431,11 @@ : /sync ( addr u -- ) \U sync [+date] [-date] synchronize logs \G sync: synchronize chat logs, starting and/or ending at specific \G sync: time/date msg-group-o .msg:peers[] $@ 0= IF drop EXIT THEN - @ to connection + @ >o o to connection ." === sync ===" forth:cr net2o-code expect-msg [: msg-group last?, ;] [msg,] end-code o> ; : /version ( addr u -- ) \U version version string