Mercurial > emacs
changeset 14591:6002d6e3aea3
(Fopen_dribble_file): Check for failure.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Sat, 17 Feb 1996 02:32:31 +0000 |
parents | 2eb3fcfa26ad |
children | 0f4d4f599de2 |
files | src/keyboard.c |
diffstat | 1 files changed, 2 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/src/keyboard.c Sat Feb 17 02:28:26 1996 +0000 +++ b/src/keyboard.c Sat Feb 17 02:32:31 1996 +0000 @@ -6890,6 +6890,8 @@ { file = Fexpand_file_name (file, Qnil); dribble = fopen (XSTRING (file)->data, "w"); + if (dribble == 0) + report_file_error ("Opening dribble", Fcons (file, Qnil)); } return Qnil; }