X-Git-Url: https://git.xandkar.net/?a=blobdiff_plain;f=tt.rkt;fp=tt.rkt;h=a51d9abf0751da8d7d102541bf4e00209c84d66b;hb=cd868590f1fb195754596f3fe9645523f3be505c;hp=1105fad8b790b781f45a8fabcc6b98a78b875da7;hpb=651cf37d88d21a2c373d5d8ac6cd2d90b585d0d2;p=tt.git

diff --git a/tt.rkt b/tt.rkt
index 1105fad..a51d9ab 100644
--- a/tt.rkt
+++ b/tt.rkt
@@ -407,6 +407,8 @@
 (module+ test
   (check-equal? (str->lines "abc\ndef\n\nghi") '("abc" "def" "ghi")))
 
+; TODO Should return 2 things: 1) msgs; 2) metadata parsed from comments
+; TODO Update peer nick based on metadata?
 (: str->msgs (-> Peer String (Listof Msg)))
 (define (str->msgs peer str)
   (filter-map (λ (line) (str->msg peer line))