Commit b27a1703 authored by Andreas Schwab's avatar Andreas Schwab
Browse files

(close_file_unwind): Fix return type and return nil.

(restore_point_unwind): Likewise.
parent 1d159538
......@@ -248,19 +248,23 @@ report_file_error (string, data)
Fcons (build_string (string), Fcons (errstring, data)));
close_file_unwind (fd)
Lisp_Object fd;
close (XFASTINT (fd));
return Qnil;
/* Restore point, having saved it as a marker. */
restore_point_unwind (location)
Lisp_Object location;
SET_PT (marker_position (location));
Fset_marker (location, Qnil, Qnil);
return Qnil;
Lisp_Object Qexpand_file_name;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment