Mercurial > hg > octave-nkf

comparison scripts/plot/closereq.m @ 8246:db19494c7c2a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
closereq.m: Respect property tag.
author Ben Abbott <bpabbott@mac.com>
date Mon, 20 Oct 2008 11:25:15 -0400
parents 5747be3ac497
children eb63fbe60fab
comparison
equal deleted inserted replaced
8245:166a689b77a9 8246:db19494c7c2a
31 cf = gcbf (); 31 cf = gcbf ();
32 if (isempty (cf)) 32 if (isempty (cf))
33 warning ("closereq: calling closereq from octave prompt is not supported, use `close' instead"); 33 warning ("closereq: calling closereq from octave prompt is not supported, use `close' instead");
34 cf = get (0, "currentfigure"); 34 cf = get (0, "currentfigure");
35 endif 35 endif
36 if (! isempty (cf) && cf != 0) 36 if (! isempty (cf) && isfigure (cf))
37 delete (cf); 37 delete (cf);
38 endif 38 endif
39 else 39 else
40 print_usage (); 40 print_usage ();
41 endif 41 endif