sys-file-writer: Consistently use "goto error" to exit.

diff --git a/src/data/sys-file-writer.c b/src/data/sys-file-writer.c
index d84e4b4fcd8fea7a8594afd570aea011f723fca9..ac5f4c903ed0266a4e50bc87a43c9b29e177cf9e 100644 (file)
--- a/src/data/sys-file-writer.c
+++ b/src/data/sys-file-writer.c
@@ -268,10 +268,7 @@ sfm_open_writer (struct file_handle *fh, struct dictionary *d,
   write_int (w, 0);
 
   if (write_error (w))
-    {
-      close_writer (w);
-      return NULL;
-    }
+    goto error;
 
   return casewriter_create (dict_get_proto (d), &sys_file_casewriter_class, w);