X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=z39.50%2Fz.tcl;h=919fd745c7beb0d6e3eaa78ea7f252fcdd029f95;hb=3fef09b4aaeb051928abf940049d138e5d73e20d;hp=275fdc83447e11f9803dc2154e6da4ca10a8b29f;hpb=da907ba05501a2050d0a70b1d1fdf22a8130589a;p=yaz-moved-to-github.git diff --git a/z39.50/z.tcl b/z39.50/z.tcl index 275fdc8..919fd74 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.5 2001-03-07 13:24:40 adam Exp $ +# $Id: z.tcl,v 1.7 2002-02-12 21:11:49 adam Exp $ # ---------------------------------------------------------- # Prefix Specifications # @@ -331,7 +331,11 @@ 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 +set membermap($m,OriginProposal_0,private) {OriginProposal_0_private zprivate} +set membermap($m,TargetResponse,private) {TargetResponse_private zprivate} # ---------------------------------------------------------- # "Constructed" types defined by means of C-types are declared here. # Each function returns the C-handler and the C-type.