1 files changed, 15 insertions, 1 deletions
diff --git a/textlist.c b/textlist.c
index 8445a20..20a3aa7 100644
--- a/textlist.c
+++ b/textlist.c
@@ -1,4 +1,4 @@
-/* $Id: textlist.c,v 1.4 2001/11/24 02:01:26 ukai Exp $ */
+/* $Id: textlist.c,v 1.5 2002/09/24 16:35:02 ukai Exp $ */
 #include "textlist.h"
 #include "indep.h"
 #include "Str.h"
@@ -79,6 +79,20 @@ rpopValue(GeneralList *tl)
     return f->ptr;
 }
 
+void
+delValue(GeneralList *tl, ListItem *it)
+{
+    if (it->prev)
+	it->prev->next = it->next;
+    else
+	tl->first = it->next;
+    if (it->next)
+	it->next->prev = it->prev;
+    else
+	tl->last = it->prev;
+    tl->nitem--;
+}
+
 GeneralList *
 appendGeneralList(GeneralList *tl, GeneralList *tl2)
 {