Mercurial > hg > octave-max
changeset 800:73fdde1f8473
[project @ 1994-10-13 16:57:33 by jwe]
author | jwe |
---|---|
date | Thu, 13 Oct 1994 16:57:33 +0000 |
parents | 47846f7e18fc |
children | cbc37d8d0fdf |
files | scripts/miscellaneous/bug_report.m |
diffstat | 1 files changed, 18 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/miscellaneous/bug_report.m +++ b/scripts/miscellaneous/bug_report.m @@ -37,10 +37,24 @@ # XXX FIXME XXX -- really need a better system command, one that will # automatically send output from the command to stdout... - if (length (subject) > 0) - system (sprintf ("octave-bug -s \"%s\" > /dev/tty", subject)); - else - system ("octave-bug > /dev/tty"); + prefs = octave_tmp_file_name (); + + if (! isempty (prefs)) + fopen (prefs, "w"); + dump_prefs (prefs); + fclose (prefs); endif + cmd = "octave-bug"; + + if (length (subject) > 0) + cmd = sprintf ("%s -s \"%s\"", cmd, subject); + endif + + if (! isempty (prefs)) + cmd = sprintf ("%s %s", cmd, prefs); + endif + + system (sprintf ("%s > /dev/tty", cmd)); + endfunction