From: Jean-Claude Wippler Date: Sun, 2 Feb 2003 00:50:22 +0000 (+0000) Subject: tweak X-Git-Tag: vfs-1-2~2 X-Git-Url: https://privyetmir.co.uk/gitweb.cgi?a=commitdiff_plain;h=d1bc8ca1e90adf38fde2e776908164d055004321;p=tclvfs tweak --- diff --git a/ChangeLog b/ChangeLog index 01ef117..c98d65d 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,7 @@ +2003-02-01 Jean-Claude Wippler + + * library/mk4vfs.tcl: fixed bad mk4vfs::_umount change + 2003-02-01 Jean-Claude Wippler * 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