diff options
| author | Björn Persson <bjorn@rombobjörn.se> | 2013-04-21 14:29:01 +0200 |
|---|---|---|
| committer | Björn Persson <bjorn@rombobjörn.se> | 2013-04-21 14:29:01 +0200 |
| commit | 1d299eb7519f87cf80e9577978b1a7242f9c9a7f (patch) | |
| tree | 8ba0a5e0b89726cb38e0b8a5d7055463cfefe46f | |
| parent | 0ac471cd02544d0c733ffd9feee3ae480a9f0a9c (diff) | |
Tweaked the logging.
| -rw-r--r-- | test/test_milter_package.adb | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/test/test_milter_package.adb b/test/test_milter_package.adb index 6a8becc..cadefb7 100644 --- a/test/test_milter_package.adb +++ b/test/test_milter_package.adb @@ -224,9 +224,10 @@ package body Test_Milter_Package is Socket_Name : constant String := "/var/spool/test_milter/milter_socket"; begin Log(Info, - "Starting. Milter API version " & Milter_API.Binding_Version_String & - ", Libmilter version " & Milter_API.Libmilter_Version_String); - Register(Name => "test_milter/libmilter", + "Starting, using " & + "Ada Milter API " & Milter_API.Binding_Version_String & " and " & + "Libmilter " & Milter_API.Libmilter_Version_String & '.'); + Register(Name => "test_milter/Libmilter", Connected => Handle_Connection'Access, Helo => Handle_Helo'Access, Sender => Handle_Sender'Access, |