Coloring #21
Coloring #21
Conversation
src/Herp/Logger/ANSI/Coloring.hs
Outdated
| import System.Console.ANSI | ||
|
|
||
| -- https://hackage.haskell.org/package/ansi-terminal-0.11.3/docs/System-Console-ANSI-Types.html#t:SGR | ||
| data SGRLogInfo = NotColored | SGRLogInfo [SGR] |
There was a problem hiding this comment.
NotColoredが使われていないようですね。仮に使ったとしても SGRLogInfo []と役割が変わらないため、SGRLogInfoを定義する必要性は低そうです
|
|
||
| stdoutANSITransport :: LoggerSet -> LogLevel -> Transport | ||
| stdoutANSITransport loggerSet transportThreshold = | ||
| let name = "stdout" |
There was a problem hiding this comment.
この名前はTransportの実装ごとに異なることが期待されています
| ) | ||
| let value = A.pairs $ series <> foldMap (uncurry (.=)) (KM.toList extra) | ||
| let json = A.encodingToLazyByteString value | ||
| -- pushLogStrLn loggerSet (toLogStr json) |
There was a problem hiding this comment.
特別な理由がない限り、コメントアウトしたコードは残さないようにしましょう
herp-logger.cabal
Outdated
| @@ -18,6 +18,8 @@ library | |||
| Herp.Logger.SentryTransport | |||
| Herp.Logger.StdoutTransport | |||
| Herp.Logger.Transport | |||
| Herp.Logger.ANSI.Coloring | |||
| Herp.Logger.StdoutANSITransport | |||
There was a problem hiding this comment.
このモジュールはもう存在しないですね(コミット忘れ？)
There was a problem hiding this comment.
すみません、その部分の修正を見落としてました。今pushしたcommitの分で修正しました。
|
了解です。その際色付きの分のテストケースを |
お願いします！ |
|
branchをrebaseし、テストを追加してみました。以下テスト結果のスクリーンショットです: 色なし: 色付き: |
src/Herp/Logger/StdoutTransport.hs
Outdated
| <> "date" .= T.decodeUtf8 (SB.fromShort date) | ||
| <> "message" .= message | ||
| ) | ||
| value = A.pairs $ series <> foldMap (uncurry (.=)) (KM.toList extra) |
tests/stdout.hs
Outdated
| loggerLevelTest loggerSet [stdoutTransport loggerSet Debug] Debug | ||
| loggerLevelTest loggerSet [stdoutTransport loggerSet Debug] Informational | ||
| loggerLevelTest loggerSet [stdoutANSITransport loggerSet Debug] Debug | ||
| loggerLevelTest loggerSet [stdoutANSITransport loggerSet Debug] Informational |
There was a problem hiding this comment.
スレッショルドのロジックは上でテストされているので、ここで改めてテストする必要はないと思います
|
コメントありがとうございます、反映させてみました。これだとどうでしょうか？ |
|
あ、マージする前にコミットをまとめて欲しかったですが、まあ今回はいいでしょう |
|
しまった、忘れてました…次からは気をつけます。 |
LogLevelにあわせて標準出力の一部に色を付ける機能を実装した