X-Git-Url: http://jsfdemo.indexdata.com/?a=blobdiff_plain;f=z39.50%2Fz.tcl;h=cdb08cafbab2eb711017c9b05bcbd160165eb995;hb=e5324215018e129dd19734acd0e683e5af748423;hp=9342d6510dc16636d5b7a1ce4c068b6c44e60fca;hpb=d205d4870b1d64af05e9d6f6a2223086af4cce9e;p=yaz-moved-to-github.git

diff --git a/z39.50/z.tcl b/z39.50/z.tcl
index 9342d65..cdb08ca 100644
--- 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.2 1999-12-16 23:36:19 adam Exp $
+# $Id: z.tcl,v 1.4 2001-02-21 13:46:54 adam Exp $
 # ----------------------------------------------------------
 # Prefix Specifications
 #  
@@ -57,6 +57,9 @@ int z_ANY_type_0 (ODR o, void **p, int opt)
 
 # Type Name overrides
 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 map($m,AttributeElement_complex) ComplexAttribute
 set map($m,DeleteSetStatus) DeleteStatus
 set membermap($m,ProximityOperator,private) {ProximityOperator_private zprivate}
@@ -320,6 +323,14 @@ set unionmap($m,DateFlags,era) {}
 # ----
 set m ResourceReport-Format-Universe-1 
 set filename($m) z-univ
+# ----
+set m ESFormat-Admin
+set filename($m) zes-admin
+set map($m,EsRequest) ESAdminRequest
+set map($m,TaskPackage) ESAdminTaskPackage
+set map($m,OriginPartToKeep) ESAdminOriginPartToKeep
+set map($m,OriginPartNotToKeep) ESAdminOriginPartNotToKeep
+set map($m,TargetPart) ESAdminTargetPart
 
 # ----------------------------------------------------------
 # "Constructed" types defined by means of C-types are declared here.