Updated for version YAZ 1.6 and higher.
[egate.git] / www / wirtcl.c
index 76e1690..0179c18 100644 (file)
@@ -41,6 +41,9 @@
  * USE OR PERFORMANCE OF THIS SOFTWARE.
  *
  * $Log: wirtcl.c,v $
+ * Revision 1.18  2001/02/26 10:35:40  adam
+ * Updated for version YAZ 1.6 and higher.
+ *
  * Revision 1.17  1996/03/15 14:43:26  adam
  * Function egw_wait returns 'cancel' if new request is pending (user
  * has cancelled); or egw_wait returns 'timeout' on timeout.
 #include <assert.h>
 #include <ctype.h>
 
-#include <log.h>
+#include <yaz/log.h>
 #include "wtcl.h"
 #include "wirtcl.h"
 
@@ -190,7 +193,7 @@ static void *do_create (WCLIENT wcl, void *args)
         gw_log (GW_LOG_FATAL, mod, "Cannot make Irtcl_Interp");
         exit (1);
     }
-    log_init(LOG_ALL, "irtcl", "irtcl_log");
+    yaz_log_init(LOG_ALL, "irtcl", "irtcl_log");
     /* initialize irtcl */
     Tcl_CreateCommand (p->interp, "egw_wait", proc_zwait_invoke, p, NULL);
     for (i=0; i<MAX_CALLBACK; i++)