From fe8a4ac0e92103284e9888f0c13c141f4711d9a3 Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Tue, 12 Dec 1995 15:57:55 +0000
Subject: [PATCH] Implemented mf_unlink. cf_unlink uses mf_unlink.

---
 bfile/commit.c |    7 ++++++-
 bfile/mfile.c  |   10 ++++++++--
 2 files changed, 14 insertions(+), 3 deletions(-)

diff --git a/bfile/commit.c b/bfile/commit.c
index e1b66e8..0c9df27 100644
--- a/bfile/commit.c
+++ b/bfile/commit.c
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: commit.c,v $
- * Revision 1.4  1995-12-11 09:03:55  adam
+ * Revision 1.5  1995-12-12 15:57:55  adam
+ * Implemented mf_unlink. cf_unlink uses mf_unlink.
+ *
+ * Revision 1.4  1995/12/11  09:03:55  adam
  * New function: cf_unlink.
  * New member of commit file head: state (0) deleted, (1) hash file.
  *
@@ -35,6 +38,8 @@ void cf_unlink (CFile cf)
     }
     cf->head.state = 0;
     cf->dirty = 1;
+    mf_unlink (cf->block_mf);
+    mf_unlink (cf->hash_mf);
 }
 
 void cf_commit (CFile cf)
diff --git a/bfile/mfile.c b/bfile/mfile.c
index 11ee0a6..7d81a98 100644
--- a/bfile/mfile.c
+++ b/bfile/mfile.c
@@ -4,7 +4,10 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: mfile.c,v $
- * Revision 1.15  1995-12-08 16:21:14  adam
+ * Revision 1.16  1995-12-12 15:57:57  adam
+ * Implemented mf_unlink. cf_unlink uses mf_unlink.
+ *
+ * Revision 1.15  1995/12/08  16:21:14  adam
  * Work on commit/update.
  *
  * Revision 1.14  1995/12/05  13:12:37  quinn
@@ -477,7 +480,10 @@ int mf_write(MFile mf, int no, int offset, int num, const void *buf)
  */
 int mf_unlink(MFile mf)
 {
-    abort();
+    int i;
+
+    for (i = 0; i < mf->no_files; i++)
+        unlink (mf->files[i].path);
     return 0;
 }
 
-- 
1.7.10.4