-
/*
* context_del.c -- delete an entry from the context/profile list
*
- * $Id$
+ * 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>
int
context_del (char *key)
{
- register struct node *np, *pp;
-
- /* sanity check - check that context has been read */
- if (defpath == NULL)
- adios (NULL, "oops, context hasn't been read yet");
+ register struct node *np, *pp;
- for (np = m_defs, pp = NULL; np; pp = np, np = np->n_next) {
- if (!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;
+ 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;
+ return 1;
}