Mercurial > hg > octave-lyh
diff scripts/plot/print.m @ 7396:0114d8cd1587
[project @ 2008-01-17 21:55:55 by jwe]
| author | jwe |
|---|---|
| date | Thu, 17 Jan 2008 21:55:55 +0000 |
| parents | 72b0181c41f1 |
| children | 3422f39573b1 bc4b8d973a3a |
line wrap: on
line diff
--- a/scripts/plot/print.m +++ b/scripts/plot/print.m @@ -86,6 +86,8 @@ ## PBMplus ## @item svg ## Scalable vector graphics +## @item pdf +## Portable document format ## @end table ## ## Other devices are supported by "convert" from ImageMagick. Type @@ -219,7 +221,7 @@ dev_list = {"aifm", "corel", "fig", "png", "pbm", "dxf", "mf", "svg", ... "hpgl", "ps", "ps2", "psc", "psc2", "eps", "eps2", ... "epsc", "epsc2", "emf", "pstex", "pslatex", ... - "epslatex", "epslatexstandalone"}; + "epslatex", "epslatexstandalone", "pdf"}; convertname = ""; [idx, errmsg] = cellidx (dev_list, dev); if (! idx) @@ -369,6 +371,28 @@ options = strcat (" size ", size); endif new_terminal = strcat ("svg", options); + + elseif (strcmp (dev, "pdf")) + ## Portable Document format + options = " "; + if (use_color >= 0) + options = "color"; + else + options = "mono"; + endif + if (force_solid > 0) + options = strcat (options, " solid"); + elseif (force_solid < 0) + options = strcat (options, " dashed"); + endif + if (! isempty (font)) + options = strcat (options, "\"", font, "\" "); + endif + if (! isempty (fontsize)) + options = strcat (options, " ", fontsize); + endif + + new_terminal = strcat ("pdf ", options); endif