]> diplodocus.org Git - nmh/blob - sbr/context_del.c
04d92b3156f0909c549dbf103410c161ba15191c
[nmh] / sbr / context_del.c
1 /* context_del.c -- delete an entry from the context/profile list
2 *
3 * This code is Copyright (c) 2002, by the authors of nmh. See the
4 * COPYRIGHT file in the root directory of the nmh distribution for
5 * complete copyright information.
6 */
7
8 #include <h/mh.h>
9 #include "error.h"
10 #include <h/utils.h>
11
12 /*
13 * Delete a key/value pair from the context/profile list.
14 * Return 0 if key is found, else return 1.
15 */
16
17 int
18 context_del (char *key)
19 {
20 struct node *np, *pp;
21
22 key = FENDNULL(key);
23 for (np = m_defs, pp = NULL; np; pp = np, np = np->n_next) {
24 if (!strcasecmp(FENDNULL(np->n_name), key)) {
25 if (!np->n_context)
26 inform("bug: context_del(key=\"%s\"), continuing...", np->n_name);
27 if (pp)
28 pp->n_next = np->n_next;
29 else
30 m_defs = np->n_next;
31 free (np->n_name);
32 free(np->n_field);
33 free(np);
34 ctxflags |= CTXMOD;
35 return 0;
36 }
37 }
38
39 return 1;
40 }