File tree 1 file changed +13
-10
lines changed
1 file changed +13
-10
lines changed Original file line number Diff line number Diff line change @@ -642,22 +642,25 @@ respondEither cfg@ProxyConfig{boosterState} booster kore req = case req of
642
642
-- extract the rule-id information from the result we proceed with
643
643
let onlyNext = head filteredNexts
644
644
rewriteRuleId = fromMaybe " UNKNOWN" onlyNext. ruleId
645
- proxyRewriteStepLog =
646
- RPCLog. Rewrite
647
- { result =
648
- RPCLog. Success
649
- { rewrittenTerm = Nothing
650
- , substitution = Nothing
651
- , ruleId = rewriteRuleId
645
+ proxyRewriteStepLogs
646
+ | Just True <- logSettings. logSuccessfulRewrites =
647
+ Just . (: [] ) $
648
+ RPCLog. Rewrite
649
+ { result =
650
+ RPCLog. Success
651
+ { rewrittenTerm = Nothing
652
+ , substitution = Nothing
653
+ , ruleId = rewriteRuleId
654
+ }
655
+ , origin = RPCLog. Proxy
652
656
}
653
- , origin = RPCLog. Proxy
654
- }
657
+ | otherwise = Nothing
655
658
Booster.Log. withContext CtxProxy $
656
659
Booster.Log. logMessage' (" Continuing after rewriting with rule " <> rewriteRuleId)
657
660
pure $
658
661
Left
659
662
( execStateToKoreJson onlyNext
660
- , logsOnly <> filteredNextLogs <> [Just [proxyRewriteStepLog] ]
663
+ , logsOnly <> filteredNextLogs <> [proxyRewriteStepLogs ]
661
664
)
662
665
-- otherwise falling through to _otherReason
663
666
CutPointRule
You can’t perform that action at this time.
0 commit comments