From d1bc8ca1e90adf38fde2e776908164d055004321 Mon Sep 17 00:00:00 2001
From: Jean-Claude Wippler <jcw@equi4.com>
Date: Sun, 2 Feb 2003 00:50:22 +0000
Subject: [PATCH] tweak

---
 ChangeLog          | 4 ++++
 library/mk4vfs.tcl | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 01ef117..c98d65d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2003-02-01  Jean-Claude Wippler  <jcw@equi4.com>
+
+	* library/mk4vfs.tcl:  fixed bad mk4vfs::_umount change
+
 2003-02-01  Jean-Claude Wippler  <jcw@equi4.com>
 
 	* library/pkgIndex.tcl.in: mk4vfs 1.8, starkit 1.1, vfslib 1.3.1
diff --git a/library/mk4vfs.tcl b/library/mk4vfs.tcl
index 99e26b0..202b297 100644
--- a/library/mk4vfs.tcl
+++ b/library/mk4vfs.tcl
@@ -310,7 +310,7 @@ namespace eval mk4vfs {
 	tclLog "umount $local? [mk::file open]"
     }
 
-    proc _umount {db} {
+    proc _umount {db args} {
 	after cancel [list mk4vfs::periodicCommit $db]
 	array unset v::mode $db
 	array unset v::timer $db
-- 
2.23.0