Ups... memory leak

[yaz-moved-to-github.git] / src / z.tcl

diff --git a/src/z.tcl b/src/z.tcl
index 38dee6c..6ea7550 100644 (file)
--- a/src/z.tcl
+++ b/src/z.tcl
@@ -1,5 +1,4 @@
 # YC Sample Config File for Z39.50
-# $Id: z.tcl,v 1.1 2003-10-27 12:21:36 adam Exp $
 # ----------------------------------------------------------
 # Prefix Specifications
 #  
@@ -343,6 +342,9 @@ set m NegotiationRecordDefinition-charSetandLanguageNegotiation-3
 set filename($m) z-charneg
 set membermap($m,OriginProposal_0,private) {OriginProposal_0_private zprivate}
 set membermap($m,TargetResponse,private) {TargetResponse_private zprivate}
+# ----
+set m UserInfoFormat-facet-1
+set filename($m) z-facet-1
 # ----------------------------------------------------------
 # "Constructed" types defined by means of C-types are declared here.
 # Each function returns the C-handler and the C-type.