Flush the journal on journal_write

diff --git a/src/output/ChangeLog b/src/output/ChangeLog
index 0073124e73f57f873e9d3609a172449902bfbb3a..b1928b970b1bc454111008fabe9edb2e4f86ab5c 100644 (file)
--- a/src/output/ChangeLog
+++ b/src/output/ChangeLog
@@ -1,3 +1,8 @@
+2008-02-08  John Darrington <john@darrington.wattle.id.au>     
+
+       * journal.c: (journal_write) flush the stream on writes.
+       Useful for discovering syntax which causes a crash.
+
 2007-09-25  Ben Pfaff  <blp@gnu.org>
 
        Patch #6210.  Reviewed by John Darrington.

diff --git a/src/output/journal.c b/src/output/journal.c
index 33fbaf2b742121adf3b7765dc15c3fe9310319a4..ef50285ea4ee1b8ba04624a37447daac433f16bb 100644 (file)
--- a/src/output/journal.c
+++ b/src/output/journal.c
@@ -98,4 +98,5 @@ journal_write (bool prefix, const char *line)
   fputs (line, journal_file);
   if (strchr (line, '\n') == NULL)
     putc ('\n', journal_file);
+  fflush (journal_file);
 }