From: Adam Dickmeiss <adam@indexdata.dk>
Date: Tue, 13 Oct 1998 21:23:37 +0000 (+0000)
Subject: Fixed log message.
X-Git-Tag: IRTCL.1.4~40
X-Git-Url: http://git.indexdata.com/?p=ir-tcl-moved-to-github.git;a=commitdiff_plain;h=edb6ab7ea99d663f55466610ca7678af2c0fadd3

Fixed log message.
---

diff --git a/mem.c b/mem.c
index d8de257..f8ee885 100644
--- a/mem.c
+++ b/mem.c
@@ -1,11 +1,14 @@
 /*
  * IR toolkit for tcl/tk
- * (c) Index Data 1995
+ * (c) Index Data 1995-1998
  * See the file LICENSE for details.
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: mem.c,v $
- * Revision 1.3  1996-07-03 13:31:14  adam
+ * Revision 1.4  1998-10-13 21:23:37  adam
+ * Fixed log message.
+ *
+ * Revision 1.3  1996/07/03 13:31:14  adam
  * The xmalloc/xfree functions from YAZ are used to manage memory.
  *
  * Revision 1.2  1995/08/29  15:30:15  adam
@@ -56,7 +59,7 @@ int ir_tcl_strdup (Tcl_Interp *interp, char** p, const char *s)
     {
         if (!interp) 
         {
-            logf (LOG_FATAL, "Out of memory in strdup. %ld bytes", len);
+            logf (LOG_FATAL, "Out of memory in strdup. %d bytes", len);
             exit (1);
         }
         interp->result = "strdup fail";