Ensure that the configured log directory do exists before opening the logfile in there.

This commit is contained in:
Dimitri Fontaine 2013-03-21 09:52:03 +01:00
parent dfd35ba9da
commit 06bbc8cdda

View File

@ -19,6 +19,7 @@
(make-instance 'log-manager :message-class 'formatted-message)) (make-instance 'log-manager :message-class 'formatted-message))
;; And a messenger to store our message into ;; And a messenger to store our message into
(ensure-directories-exist (directory-namestring *log-filename*))
(start-messenger 'text-file-messenger :filename *log-filename*) (start-messenger 'text-file-messenger :filename *log-filename*)
;; Announce what just happened ;; Announce what just happened