Rustam's patch

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

diff --git a/z39.50/z.tcl b/z39.50/z.tcl
index cdb08ca..7100253 100644 (file)
--- a/z39.50/z.tcl
+++ b/z39.50/z.tcl
@@ -1,5 +1,5 @@
 # YC Sample Config File for Z39.50
-# $Id: z.tcl,v 1.4 2001-02-21 13:46:54 adam Exp $
+# $Id: z.tcl,v 1.6 2002-02-11 23:25:27 adam Exp $
 # ----------------------------------------------------------
 # Prefix Specifications
 #  
@@ -59,7 +59,7 @@ int z_ANY_type_0 (ODR o, void **p, int opt)
 set map($m,PDU) APDU
 set membermap($m,Operator,and) {Operator_and op_and}
 set membermap($m,Operator,or) {Operator_or op_or}
-set membermap($m,Operator,and-not) {Operator_and_not op_and_not}
+#set membermap($m,Operator,and-not) {Operator_and_not op_and_not}
 set map($m,AttributeElement_complex) ComplexAttribute
 set map($m,DeleteSetStatus) DeleteStatus
 set membermap($m,ProximityOperator,private) {ProximityOperator_private zprivate}
@@ -331,6 +331,9 @@ set map($m,TaskPackage) ESAdminTaskPackage
 set map($m,OriginPartToKeep) ESAdminOriginPartToKeep
 set map($m,OriginPartNotToKeep) ESAdminOriginPartNotToKeep
 set map($m,TargetPart) ESAdminTargetPart
+# ----
+set m NegotiationRecordDefinition-charSetandLanguageNegotiation-3
+set filename($m) z-charneg
 
 # ----------------------------------------------------------
 # "Constructed" types defined by means of C-types are declared here.