[Fencommits] fenserve: unformat non-command lines in the logs
Tuukka Hastrup
Tuukka.Hastrup at iki.fi
Wed May 9 18:50:28 EEST 2007
Wed May 9 18:43:48 EEST 2007 Tuukka Hastrup <Tuukka.Hastrup at iki.fi>
* unformat non-command lines in the logs
diff -rN -u old-fenserve/notetaker/Main.hs new-fenserve/notetaker/Main.hs
--- old-fenserve/notetaker/Main.hs 2007-05-09 18:50:28.000000000 +0300
+++ new-fenserve/notetaker/Main.hs 2007-05-09 18:50:28.000000000 +0300
@@ -178,7 +178,7 @@
++ renderTime time ++ " " ++ renderBody nick body
renderBody :: String -> Body -> String
-renderBody nick (Body s) = printf "<<b>%s</b>> %s" nick s
+renderBody nick (Body s) = printf "<<b>%s</b>> %s" nick (unformat s)
renderBody nick body = printf "<i><b>%s</b> %s" nick (msg body) where
msg :: Body -> String
msg (Add [] l) = printf "adds:</i> %s" l
More information about the Fencommits
mailing list