Mercurial > hg > octave-nkf

comparison scripts/plot/util/ginput.m @ 19205:60e54be64f37

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fix ginput for FLTK toolkit * __init_fltk__.cc: Execute callback for base_properties::buttondownfcn and figure_properties::buttondownfcn. Now it is possible to have different callbacks for each axes in a subplot. * __fltk_ginput__.m: Adapt to recent FLTK toolkit changes
author Andreas Weber <andy.weber.aw@gmail.com>
date Sat, 16 Aug 2014 22:59:44 +0200
parents d63878346099
children 4197fc428c7d
comparison
equal deleted inserted replaced
19204:7f73293d8423 19205:60e54be64f37
37 37
38 if (nargin > 1) 38 if (nargin > 1)
39 print_usage (); 39 print_usage ();
40 endif 40 endif
41 41
42 f = gcf ();
43 a = gca (); # Create an axis, if necessary 42 a = gca (); # Create an axis, if necessary
44 drawnow (); 43 drawnow ();
45 toolkit = get (f, "__graphics_toolkit__"); 44 toolkit = get (gcf, "__graphics_toolkit__");
46 45
47 varargout = cell (1, nargout); 46 varargout = cell (1, nargout);
48 if (nargin == 0) 47 if (nargin == 0)
49 [varargout{:}] = feval (["__" toolkit "_ginput__"], f); 48 [varargout{:}] = feval (["__" toolkit "_ginput__"]);
50 else 49 else
51 [varargout{:}] = feval (["__" toolkit "_ginput__"], f, n); 50 [varargout{:}] = feval (["__" toolkit "_ginput__"], n);
52 endif 51 endif
53 52
54 endfunction 53 endfunction
55 54
56 55