X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=z39.50%2Fz.tcl;h=919fd745c7beb0d6e3eaa78ea7f252fcdd029f95;hb=3bb2e157affd19490974257a252472716d7858b3;hp=7100253bdbaa7c3e3fd009c5f19a71684e505e74;hpb=c34d71d35aceed27cf7e30e6b329a235b48b9ccd;p=yaz-moved-to-github.git diff --git a/z39.50/z.tcl b/z39.50/z.tcl index 7100253..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.6 2002-02-11 23:25:27 adam Exp $ +# $Id: z.tcl,v 1.7 2002-02-12 21:11:49 adam Exp $ # ---------------------------------------------------------- # Prefix Specifications # @@ -334,7 +334,8 @@ 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.