From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 14095 invoked from network); 21 Jul 2008 02:21:57 -0000 X-Spam-Checker-Version: SpamAssassin 3.2.5 (2008-06-10) on f.primenet.com.au X-Spam-Level: X-Spam-Status: No, score=-2.6 required=5.0 tests=BAYES_00 autolearn=ham version=3.2.5 Received: from news.dotsrc.org (HELO a.mx.sunsite.dk) (130.225.247.88) by ns1.primenet.com.au with SMTP; 21 Jul 2008 02:21:57 -0000 Received-SPF: none (ns1.primenet.com.au: domain at sunsite.dk does not designate permitted sender hosts) Received: (qmail 80319 invoked from network); 21 Jul 2008 02:21:54 -0000 Received: from sunsite.dk (130.225.247.90) by a.mx.sunsite.dk with SMTP; 21 Jul 2008 02:21:54 -0000 Received: (qmail 4514 invoked by alias); 21 Jul 2008 02:21:51 -0000 Mailing-List: contact zsh-workers-help@sunsite.dk; run by ezmlm Precedence: bulk X-No-Archive: yes X-Seq: 25321 Received: (qmail 4499 invoked from network); 21 Jul 2008 02:21:50 -0000 Received: from bifrost.dotsrc.org (130.225.254.106) by sunsite.dk with SMTP; 21 Jul 2008 02:21:50 -0000 Received: from cork.scru.org (cork.scru.org [209.20.67.2]) by bifrost.dotsrc.org (Postfix) with ESMTPS id 169AD80561C3 for ; Mon, 21 Jul 2008 04:21:47 +0200 (CEST) Received: by cork.scru.org (Postfix, from userid 1000) id C4A3D10402D; Mon, 21 Jul 2008 02:21:45 +0000 (UTC) Date: Mon, 21 Jul 2008 02:21:45 +0000 From: Clint Adams To: zsh-workers@sunsite.dk Subject: PATCH: unset/delete gdbm elements Message-ID: <20080721022145.GA24380@scru.org> Mail-Followup-To: zsh-workers@sunsite.dk References: <20080721001634.GA20601@scru.org> <20080721005152.GA21796@scru.org> <20080721014412.GA23562@scru.org> MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <20080721014412.GA23562@scru.org> User-Agent: Mutt/1.5.18 (2008-05-17) X-Virus-Scanned: ClamAV 0.92.1/7764/Sun Jul 20 18:42:45 2008 on bifrost X-Virus-Status: Clean ztie -d db/gdbm -f /tmp/newfile.db hokeypokey hokeypokey[horse]=buggy hokeypokey[apple]=pie print -l -- ${hokeypokey} print ${hokeypokey[horse]} print ${hokeypokey[apple]} unset "hokeypokey[apple]" diff --git a/Src/Modules/db_gdbm.c b/Src/Modules/db_gdbm.c index d8f6724..ce7a6f5 100644 --- a/Src/Modules/db_gdbm.c +++ b/Src/Modules/db_gdbm.c @@ -132,7 +132,6 @@ gdbmsetfn(Param pm, char **val) datum key, content; int ret; - key.dptr = pm->node.nam; key.dsize = strlen(key.dptr) + 1; content.dptr = val; @@ -145,7 +144,13 @@ gdbmsetfn(Param pm, char **val) static void gdbmunsetfn(Param pm, int um) { + datum key; + int ret; + + key.dptr = pm->node.nam; + key.dsize = strlen(key.dptr) + 1; + ret = gdbm_delete(dbf, key); } /**/