P36-Log is a simple logging library for Common Lisp. Logging and
Debug Logging are conceptually separate in this library.
| 修订版 | 6a9dd3c66f7d2b89be96e73e560b55ff7cc64b04 (tree) |
|---|---|
| 时间 | 2019-07-19 10:14:21 |
| 作者 | Alexa Jones-Gonzales <dj.haruko@gmai...> |
| Commiter | Alexa Jones-Gonzales |
Updated to work with the recent p36-lib work
src/simple-logging.lisp (diff)| @@ -33,7 +33,7 @@ | ||
| 33 | 33 | (defparameter *simple-header/error* "Error" |
| 34 | 34 | "The header for error messages printed using the Simple Logging API.") |
| 35 | 35 | |
| 36 | -(declaim (type p36:t/ansi-simple-color *simple-color/info* *simple-color/warn* | |
| 36 | +(declaim (type p36-ansi:t/ansi-simple-color *simple-color/info* *simple-color/warn* | |
| 37 | 37 | *simple-color/error*)) |
| 38 | 38 | |
| 39 | 39 | (defparameter *simple-color/info* :cyan |
| @@ -63,7 +63,7 @@ | ||
| 63 | 63 | `(progn |
| 64 | 64 | (if *simple/no-color* |
| 65 | 65 | (format ,stream "[~a]" ,header) |
| 66 | - (p36:ansi/format-colored (,stream ,color) "[~a]" ,header)) | |
| 66 | + (p36-ansi:ansi/format-colored (,stream ,color) "[~a]" ,header)) | |
| 67 | 67 | (format ,stream ": ") |
| 68 | 68 | (format ,stream ,msg ,@fmt-args) |
| 69 | 69 |
Fork