X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/2e768e3cc0ce768373d3320eca4cdd08b8cf646a..f1920d78123667716f2321d37ce37628603b2700:/sbr/readconfig.c

diff --git a/sbr/readconfig.c b/sbr/readconfig.c
index be458239..2e319fe6 100644
--- a/sbr/readconfig.c
+++ b/sbr/readconfig.c
@@ -27,14 +27,12 @@ static struct procstr procs[] = {
     { "mailproc",      &mailproc },
     { "mhlproc",       &mhlproc },
     { "moreproc",      &moreproc },
-    { "mshproc",       &mshproc },
     { "packproc",      &packproc },
     { "postproc",      &postproc },
     { "rmmproc",       &rmmproc },
     { "sendproc",      &sendproc },
     { "showmimeproc",  &showmimeproc },
     { "showproc",      &showproc },
-    { "vmhproc",       &vmhproc },
     { "whatnowproc",   &whatnowproc },
     { "whomproc",      &whomproc },
     { NULL,            NULL }
@@ -132,7 +130,7 @@ readconfig (struct node **npp, FILE *ib, char *file, int ctx)
 	   mhn.defaults can be overridden without triggering
 	   warnings.
 
-	   Note that that mhn.defaults, $MHN, $MHBUILD, $MHSHOW, and
+	   Note that mhn.defaults, $MHN, $MHBUILD, $MHSHOW, and
 	   $MHSTORE all put their entries into just one list, m_defs,
 	   the same list that the profile uses. */
 
@@ -143,7 +141,7 @@ readconfig (struct node **npp, FILE *ib, char *file, int ctx)
 	    if (strlen (np->n_name) > 0	 &&  strcmp ("#", np->n_name)) {
 		struct node *np2;
 		for (np2 = np->n_next; np2; np2 = np2->n_next) {
-		    if (! mh_strcasecmp (np->n_name, np2->n_name)) {
+		    if (! strcasecmp (np->n_name, np2->n_name)) {
 			admonish (NULL, "multiple \"%s\" profile components "
 					"in %s, ignoring \"%s\"",
 				  np->n_name, defpath, np2->n_field);
@@ -155,3 +153,18 @@ readconfig (struct node **npp, FILE *ib, char *file, int ctx)
 
     opp = npp;
 }
+
+
+void
+add_profile_entry (const char *key, const char *value) {
+    struct node *newnode = (struct node *) mh_xmalloc (sizeof *newnode);
+
+    /* This inserts the new node at the beginning of m_defs because
+       that doesn't require traversing it or checking to see if it's
+       empty. */
+    newnode->n_name = getcpy (key);
+    newnode->n_field = getcpy (value);
+    newnode->n_context = 0;
+    newnode->n_next = m_defs;
+    m_defs = newnode;
+}