1
0
Fork 0

syslog: Fix the level for the custom exception method

This commit is contained in:
Holger Hans Peter Freyther 2011-04-14 12:39:18 +02:00
parent e3a90ff2d3
commit 9f364cbcd1
1 changed files with 3 additions and 1 deletions

View File

@ -82,7 +82,9 @@ LogTarget subclass: LogTargetSyslog [
]
exception: aMessage [
self class c_syslog: aMessage level fmt: '%s%s'
| level |
level := self class logLevelMap at: aMessage level.
self class c_syslog: level fmt: '%s%s'
args: {self prefix. 'EXCEPTION occured'}.
self print: aMessage.
]