diff options
author | Holger Hans Peter Freyther <zecke@selfish.org> | 2011-04-14 12:39:18 +0200 |
---|---|---|
committer | Holger Hans Peter Freyther <zecke@selfish.org> | 2011-04-14 12:39:18 +0200 |
commit | 9f364cbcd1f8c82a3fa8214aa9161615f7bcb7f4 (patch) | |
tree | 0c3304f438863afb87af02e6f04fb1019b6de6b6 | |
parent | e3a90ff2d36a395184d8e3971a1f4f6c7560acde (diff) |
syslog: Fix the level for the custom exception method
-rw-r--r-- | LogSyslog.st | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/LogSyslog.st b/LogSyslog.st index ee3bced..f3f1013 100644 --- a/LogSyslog.st +++ b/LogSyslog.st @@ -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. ] |