X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=z39.50%2Fz.tcl;h=275fdc83447e11f9803dc2154e6da4ca10a8b29f;hb=49bb5732e64ef1bd772d5393450815684eac39b6;hp=9342d6510dc16636d5b7a1ce4c068b6c44e60fca;hpb=d205d4870b1d64af05e9d6f6a2223086af4cce9e;p=yaz-moved-to-github.git diff --git a/z39.50/z.tcl b/z39.50/z.tcl index 9342d65..275fdc8 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.5 2001-03-07 13:24:40 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.