Mercurial > hg > octave-nkf

comparison scripts/plot/__gnuplot_print__.m @ 11588:d5bd2766c640

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style fixes for warning and error messages in script files
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 17:51:13 -0500
parents c792872f8942
children b0084095098e
comparison
equal deleted inserted replaced
11587:c792872f8942 11588:d5bd2766c640
91 case "tikz" 91 case "tikz"
92 if (__gnuplot_has_terminal__ ("tikz")) 92 if (__gnuplot_has_terminal__ ("tikz"))
93 local_drawnow (sprintf ("lua tikz %s", gp_opts), opts.name, opts); 93 local_drawnow (sprintf ("lua tikz %s", gp_opts), opts.name, opts);
94 else 94 else
95 error (sprintf ("print:no%soutput", opts.devopt), 95 error (sprintf ("print:no%soutput", opts.devopt),
96 "print.m: '%s' output is not available for Gnuplot-%s.", 96 "print.m: '%s' output is not available for gnuplot-%s",
97 upper (opts.devopt), __gnuplot_version__ ()) 97 upper (opts.devopt), __gnuplot_version__ ())
98 endif 98 endif
99 case "svg" 99 case "svg"
100 local_drawnow (sprintf ("svg dynamic %s", gp_opts), opts.name, opts); 100 local_drawnow (sprintf ("svg dynamic %s", gp_opts), opts.name, opts);
101 case {"aifm", "corel", "eepic", "emf", "fig"} 101 case {"aifm", "corel", "eepic", "emf", "fig"}
103 case {"pdfcairo", "pngcairo"} 103 case {"pdfcairo", "pngcairo"}
104 if (__gnuplot_has_terminal__ (opts.devopt)) 104 if (__gnuplot_has_terminal__ (opts.devopt))
105 local_drawnow (sprintf ("%s %s", opts.devopt, gp_opts), opts.name, opts); 105 local_drawnow (sprintf ("%s %s", opts.devopt, gp_opts), opts.name, opts);
106 else 106 else
107 error (sprintf ("print:no%soutput", opts.devopt), 107 error (sprintf ("print:no%soutput", opts.devopt),
108 "print.m: '%s' output is not available for Gnuplot-%s.", 108 "print.m: '%s' output is not available for gnuplot-%s",
109 upper (opts.devopt), __gnuplot_version__ ()) 109 upper (opts.devopt), __gnuplot_version__ ())
110 endif 110 endif
111 case {"canvas", "dxf", "hpgl", "mf", "gif", "pstricks", "texdraw"} 111 case {"canvas", "dxf", "hpgl", "mf", "gif", "pstricks", "texdraw"}
112 local_drawnow (sprintf ("%s %s", opts.devopt, gp_opts), opts.name, opts) 112 local_drawnow (sprintf ("%s %s", opts.devopt, gp_opts), opts.name, opts)
113 case opts.ghostscript.device 113 case opts.ghostscript.device
153 if (status) 153 if (status)
154 fprintf ("%s\n%s\n%s\n", 154 fprintf ("%s\n%s\n%s\n",
155 "---------- output begin ----------", 155 "---------- output begin ----------",
156 output, 156 output,
157 "----------- output end -----------"); 157 "----------- output end -----------");
158 error ("gnuplot:failedpipe", "print: Failed to print.") 158 error ("gnuplot:failedpipe", "print: failed to print")
159 endif 159 endif
160 endfor 160 endfor
161 161
162 endfunction 162 endfunction
163 163