Allow :debug syslog level recognition

sharplispers · Jul 20, 2020 · 8c48d6f · 8c48d6f
1 parent 925863c
commit 8c48d6f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/appender/syslog-appender-cffi.lisp b/src/appender/syslog-appender-cffi.lisp
@@ -26,5 +26,5 @@
       (:error :err)
       (:warn  :warning)
       (:info  :info)
-      ((:debu1 :debu2 :debu3 :debu4 :debu5 :debu6 :debu7 :debu8 :debu9)
+      ((:debug :debu1 :debu2 :debu3 :debu4 :debu5 :debu6 :debu7 :debu8 :debu9)
        :debug))))
diff --git a/src/appender/syslog-appender-sbcl.lisp b/src/appender/syslog-appender-sbcl.lisp
@@ -28,5 +28,5 @@
       (:error sb-posix:log-err)
       (:warn  sb-posix:log-warning)
       (:info  sb-posix:log-info)
-      ((:debu1 :debu2 :debu3 :debu4 :debu5 :debu6 :debu7 :debu8 :debu9)
+      ((:debug :debu1 :debu2 :debu3 :debu4 :debu5 :debu6 :debu7 :debu8 :debu9)
        sb-posix:log-debug))))