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