Mercurial > hg > octave-nkf
changeset 5625:f88f2e35ad6e
[project @ 2006-02-15 18:42:22 by jwe]
author | jwe |
---|---|
date | Wed, 15 Feb 2006 18:42:22 +0000 |
parents | 02c88fe23632 |
children | 3236b4d98fde |
files | scripts/ChangeLog scripts/plot/print.m |
diffstat | 2 files changed, 30 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/scripts/ChangeLog +++ b/scripts/ChangeLog @@ -1,3 +1,12 @@ +2006-02-15 Dmitri A. Sergatskov <dasergatskov@gmail.com> + + * plot/print.m: Accept emf device option to support Enhanced + Metafile format. + +2006-02-15 A S Hodel <hodelas@auburn.edu> + + * control/base/lqe.m: Doc fix. + 2006-02-15 Keith Goodman <kwgoodman@gmail.com> * statistics/distributions/gamcdf.m: Doc fix.
--- a/scripts/plot/print.m +++ b/scripts/plot/print.m @@ -198,7 +198,7 @@ ## check if we have to use convert dev_list = {"aifm" "corel" "fig" "png" "pbm" "dxf" "mf" "hpgl", ... - "ps" "ps2" "psc" "psc2" "eps" "eps2" "epsc" "epsc2"}; + "ps" "ps2" "psc" "psc2" "eps" "eps2" "epsc" "epsc2" "emf"}; convertname = ""; idx = cellidx (dev_list, dev); if (! idx) @@ -281,6 +281,26 @@ __gnuplot_raw__ ("set terminal push;\n"); __gnuplot_raw__ (sprintf ("set terminal fig %s;\n", options)); + elseif (strcmp (dev, "emf")) + ## Enhanced Metafile format + options = " "; + if (use_color >= 0) + options = " color"; + else + options = " mono"; + endif + if (force_solid >= 0) + options = strcat (options, " solid"); + endif + if (! isempty (font)) + options = strcat (options, " \"", font, "\""); + endif + if (! isempty (fontsize)) + options = strcat (options, " ", fontsize); + endif + __gnuplot_raw__ ("set terminal push;\n"); + __gnuplot_raw__ (sprintf ("set terminal emf %s;\n", options)); + elseif (strcmp (dev, "png") || strcmp (dev, "pbm")) ## Portable network graphics, PBMplus