Mercurial > emacs
changeset 28561:98330e399518
(a_write): Remove redundant semi-colons.
(e_write): Return -1 if failed to write all the data.
This fixes the changes made at 1999-12-15.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Thu, 13 Apr 2000 10:16:18 +0000 |
parents | fb9c1497b601 |
children | 374cbdbde9bd |
files | src/fileio.c |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/src/fileio.c Wed Apr 12 18:30:39 2000 +0000 +++ b/src/fileio.c Thu Apr 13 10:16:18 2000 +0000 @@ -4925,7 +4925,7 @@ /* Output buffer text up to the next annotation's position. */ if (nextpos > pos) { - if (0 > e_write (desc, string, pos, nextpos, coding)); + if (0 > e_write (desc, string, pos, nextpos, coding)) return -1; pos = nextpos; } @@ -4933,7 +4933,7 @@ tem = Fcdr (Fcar (*annot)); if (STRINGP (tem)) { - if (0 > e_write (desc, tem, 0, XSTRING (tem)->size, coding)); + if (0 > e_write (desc, tem, 0, XSTRING (tem)->size, coding)) return -1; } *annot = Fcdr (*annot); @@ -5020,7 +5020,7 @@ if (coding->cmp_data) coding_adjust_composition_offset (coding, start); } - return 0; + return return_val; } DEFUN ("verify-visited-file-modtime", Fverify_visited_file_modtime,