From 5516c70e7bfcb8e8dce5e2e82383cb85f476745f Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Fri, 2 Jul 2004 17:02:42 +0000 Subject: [PATCH] r9728: updates --- logger.lisp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/logger.lisp b/logger.lisp index 3c7ff2d..0b442ce 100644 --- a/logger.lisp +++ b/logger.lisp @@ -142,6 +142,9 @@ (defmethod log-file-path (output-root channel-name year month day (format (eql :sexp))) (%log-file-path output-root channel-name year month day "sexp")) +(defmethod log-file-path (output-root channel-name year month day (format (eql :binary))) + (%log-file-path output-root channel-name year month day "bin")) + (defmethod log-file-path (output-root channel-name year month day (format (eql :text))) (%log-file-path output-root channel-name year month day "txt")) -- 2.34.1