Print a newline after each TXT message in DNS.

db4
Doug Coleman 2011-04-10 14:10:13 -05:00
parent 250d96d7b1
commit 1e78347643
1 changed files with 1 additions and 1 deletions

View File

@ -351,7 +351,7 @@ M: TXT rdata>byte-array
] map ;
: TXT. ( domain -- )
dns-TXT-query TXT-message>strings [ [ write ] each ] each ;
dns-TXT-query TXT-message>strings [ [ write ] each nl ] each ;
: reverse-lookup ( reversed-ip -- message )
PTR IN <query> dns-query ;