diff --git a/LogTest.st b/LogTest.st index 25680c4..b8f0558 100644 --- a/LogTest.st +++ b/LogTest.st @@ -36,19 +36,35 @@ Osmo.LogArea subclass: LogAreaSCCP [ ] Eval [ + | syslog | '123' logDebug: 'TEST' area: #sccp. '123' logException: 'TEST' area: #sccp. "SYSLOG" - Object logManager target: - (Osmo.LogTargetSyslog - openlog: 'ow' option: 0 facility: Osmo.LogTargetSyslog LOG_USER). - '123' logException: 'ABC' area: #sccp. + syslog := (Osmo.LogTargetSyslog + openlog: 'ow' option: 0 facility: Osmo.LogTargetSyslog LOG_USER). + syslog prefix: 'abc:'. + Object logManager target: syslog. + + + '123' logError: 'Error message' area: #sccp. + + [ + '123' error: 'ABC DEF'. + ] on: Error do: [:e | + e logException: 'Exception... ' area: #sccp. + ]. Object logManager target: (Osmo.LogTargetSyslog openlog: 'ow2' option: 0 facility: Osmo.LogTargetSyslog LOG_USER). - '123' logException: 'ABC' area: #sccp. + '123' logError: 'Error message' area: #sccp. + + [ + '123' error: 'ABC DEF'. + ] on: Error do: [:e | + e logException: 'Exception... ' area: #sccp. + ]. ]