[CSL-555] Use 'bracketOnError' in 'applyWithRollback'
[CSL-555] Use 'bracketOnError' in 'applyWithRollback'

input-output-hk/cardano-sl,input-output-hk/cardano-sl,input-output-hk/cardano-sl,input-output-hk/cardano-sl,input-output-hk/pos-haskell-prototype,input-output-hk/pos-haskell-prototype,input-output-hk/pos-haskell-prototype