Mercurial > octave-libtiff
changeset 20196:10414d7a25f8
test.m: Show error message and shared variables section in pager (bug #45007).
* test.m: In case of error, only flush stdin after both the message error and
the shared variables section have been printed. This will allow the inclusion
of the error message in the pager, which may be called (if "more on") when the
shared variables section is too long.
author | Rafael Laboissiere <rafael@laboissiere.net> |
---|---|
date | Mon, 04 May 2015 09:27:33 -0300 |
parents | ea5fdb2ae637 |
children | 2283dd03bf50 |
files | scripts/testfun/test.m |
diffstat | 1 files changed, 1 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/testfun/test.m Thu May 07 22:04:10 2015 +0200 +++ b/scripts/testfun/test.m Mon May 04 09:27:33 2015 -0300 @@ -609,14 +609,13 @@ fflush (__fid); endif fprintf (__fid, "%s\n", __msg); - fflush (__fid); ## Show the variable context. if (! strcmp (__type, "error") && ! strcmp (__type, "testif") && ! all (__shared == " ")) fputs (__fid, "shared variables "); eval (sprintf ("fdisp(__fid,var2struct(%s));", __shared)); - fflush (__fid); endif + fflush (__fid); endif if (! __success && ! __isxtest) __all_success = false;