Mercurial > hg > octave-lyh
diff scripts/plot/print.m @ 5625:f88f2e35ad6e
[project @ 2006-02-15 18:42:22 by jwe]
| author | jwe |
|---|---|
| date | Wed, 15 Feb 2006 18:42:22 +0000 |
| parents | 9d45e5bfdaff |
| children | 960f4b9a26af |
line wrap: on
line diff
--- 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