diff --git a/vfs/ChangeLog b/vfs/ChangeLog
index 652ab20c7..ce818f0ce 100644
--- a/vfs/ChangeLog
+++ b/vfs/ChangeLog
@@ -1,3 +1,8 @@
+2001-02-27  Pavel Machek  <pavel@bug.ucw.cz>
+
+	* vfs.c (mc_ungetlocalcopy): Do not ignore errors. (Courtesy of
+	"K. Leif D. Van Horn" <leif@kaivo.com>)
+
 2001-02-23  Pavel Roskin  <proski@gnu.org>
 
 	* extfs/lslR (mclslRfs_list): Don't use gawk-specific features.
diff --git a/vfs/vfs.c b/vfs/vfs.c
index 443a693a1..9eb6b5c62 100644
--- a/vfs/vfs.c
+++ b/vfs/vfs.c
@@ -1143,14 +1143,15 @@ mc_def_ungetlocalcopy (vfs *vfs, char *filename, char *local, int has_changed)
 int
 mc_ungetlocalcopy (const char *pathname, char *local, int has_changed)
 {
+    int return_value = 0;
     char *path = vfs_canon (pathname);
     vfs *vfs = vfs_type (path);
 
-    vfs->ungetlocalcopy ? (*vfs->ungetlocalcopy)(vfs, vfs_name (path), local, has_changed) :
-                          mc_def_ungetlocalcopy (vfs, vfs_name (path), local, has_changed);
-    /* FIXME: errors are ignored at this point */
+    return_value = vfs->ungetlocalcopy ? 
+            (*vfs->ungetlocalcopy)(vfs, vfs_name (path), local, has_changed) :
+            mc_def_ungetlocalcopy (vfs, vfs_name (path), local, has_changed);
     g_free (path);
-    return 0;
+    return return_value;
 }
 
 /*