Mercurial > octave
annotate scripts/gui/uiputfile.m @ 31376:ad8a4102f910
doc: Spellcheck documentation for 8.1 release.
* aspell-octave.en.pws: Update private dictionary with new Octave-specific
words and remove words no longer required.
* install.txi, preface.txi, vectorize.txi, interpreter.cc, qr.cc, uimenu.m,
uiputfile.m: Correct spellings and/or use @nospell macro to remove words
from spellchecking.
author | Rik <rik@octave.org> |
---|---|
date | Mon, 31 Oct 2022 10:01:50 -0700 |
parents | e1788b1a315f |
children | a3d8915b9f87 |
rev | line source |
---|---|
27923
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
1 ######################################################################## |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
2 ## |
30564
796f54d4ddbf
update Octave Project Developers copyright for the new year
John W. Eaton <jwe@octave.org>
parents:
30196
diff
changeset
|
3 ## Copyright (C) 2010-2022 The Octave Project Developers |
27918
b442ec6dda5c
use centralized file for copyright info for individual contributors
John W. Eaton <jwe@octave.org>
parents:
27908
diff
changeset
|
4 ## |
27923
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
5 ## See the file COPYRIGHT.md in the top-level directory of this |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
6 ## distribution or <https://octave.org/copyright/>. |
11283 | 7 ## |
8 ## This file is part of Octave. | |
9 ## | |
24534
194eb4bd202b
maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents:
23220
diff
changeset
|
10 ## Octave is free software: you can redistribute it and/or modify it |
11283 | 11 ## under the terms of the GNU General Public License as published by |
24534
194eb4bd202b
maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents:
23220
diff
changeset
|
12 ## the Free Software Foundation, either version 3 of the License, or |
22755
3a2b891d0b33
maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents:
22323
diff
changeset
|
13 ## (at your option) any later version. |
11283 | 14 ## |
15 ## Octave is distributed in the hope that it will be useful, but | |
16 ## WITHOUT ANY WARRANTY; without even the implied warranty of | |
22755
3a2b891d0b33
maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents:
22323
diff
changeset
|
17 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
3a2b891d0b33
maint: Standardize Copyright formatting.
Rik <rik@octave.org>
parents:
22323
diff
changeset
|
18 ## GNU General Public License for more details. |
11283 | 19 ## |
20 ## You should have received a copy of the GNU General Public License | |
21 ## along with Octave; see the file COPYING. If not, see | |
24534
194eb4bd202b
maint: Update punctuation for GPL v3 license text.
Rik <rik@octave.org>
parents:
23220
diff
changeset
|
22 ## <https://www.gnu.org/licenses/>. |
27923
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
23 ## |
bd51beb6205e
update formatting of copyright notices
John W. Eaton <jwe@octave.org>
parents:
27919
diff
changeset
|
24 ######################################################################## |
11283 | 25 |
26 ## -*- texinfo -*- | |
20852
516bb87ea72e
2015 Code Sprint: remove class of function from docstring for all m-files.
Rik <rik@octave.org>
parents:
20778
diff
changeset
|
27 ## @deftypefn {} {[@var{fname}, @var{fpath}, @var{fltidx}] =} uiputfile () |
516bb87ea72e
2015 Code Sprint: remove class of function from docstring for all m-files.
Rik <rik@octave.org>
parents:
20778
diff
changeset
|
28 ## @deftypefnx {} {[@var{fname}, @var{fpath}, @var{fltidx}] =} uiputfile (@var{flt}) |
516bb87ea72e
2015 Code Sprint: remove class of function from docstring for all m-files.
Rik <rik@octave.org>
parents:
20778
diff
changeset
|
29 ## @deftypefnx {} {[@var{fname}, @var{fpath}, @var{fltidx}] =} uiputfile (@var{flt}, @var{dialog_name}) |
516bb87ea72e
2015 Code Sprint: remove class of function from docstring for all m-files.
Rik <rik@octave.org>
parents:
20778
diff
changeset
|
30 ## @deftypefnx {} {[@var{fname}, @var{fpath}, @var{fltidx}] =} uiputfile (@var{flt}, @var{dialog_name}, @var{default_file}) |
19833
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
31 ## Open a GUI dialog for selecting a file. |
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
32 ## |
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
33 ## @var{flt} contains a (list of) file filter string(s) in one of the following |
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
34 ## formats: |
11283 | 35 ## |
17281
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
36 ## @table @asis |
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
37 ## @item @qcode{"/path/to/filename.ext"} |
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
38 ## If a filename is given the file extension is extracted and used as filter. |
27831
b42e4b3dee5d
uigetfile.m, uiputfile.m: Add documentation for output arguments (bug #55419).
Markus Mützel <markus.muetzel@gmx.de>
parents:
27263
diff
changeset
|
39 ## In addition the path is selected as current path in the dialog and the |
31376
ad8a4102f910
doc: Spellcheck documentation for 8.1 release.
Rik <rik@octave.org>
parents:
30893
diff
changeset
|
40 ## filename is selected as default file. Example: |
ad8a4102f910
doc: Spellcheck documentation for 8.1 release.
Rik <rik@octave.org>
parents:
30893
diff
changeset
|
41 ## @code{uiputfile ("myfcn.m")} |
11283 | 42 ## |
17281
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
43 ## @item @qcode{"*.ext"} |
11587
c792872f8942
all script files: untabify and strip trailing whitespace
John W. Eaton <jwe@octave.org>
parents:
11583
diff
changeset
|
44 ## A single file extension. |
17281
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
45 ## Example: @code{uiputfile ("*.ext")} |
11283 | 46 ## |
17281
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
47 ## @item @code{@{"*.ext", "My Description"@}} |
11283 | 48 ## A 2-column cell array containing the file extension in the 1st column and |
49 ## a brief description in the 2nd column. | |
17281
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
50 ## Example: @code{uiputfile (@{"*.ext","My Description";"*.xyz", |
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
51 ## "XYZ-Format"@})} |
11283 | 52 ## @end table |
11587
c792872f8942
all script files: untabify and strip trailing whitespace
John W. Eaton <jwe@octave.org>
parents:
11583
diff
changeset
|
53 ## |
11283 | 54 ## The filter string can also contain a semicolon separated list of filter |
55 ## extensions. | |
17281
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
56 ## Example: @code{uiputfile (@{"*.gif;*.png;*.jpg", |
bc924baa2c4e
doc: Add new @qcode macro for code samples which are quoted.
Rik <rik@octave.org>
parents:
16581
diff
changeset
|
57 ## "Supported Picture Formats"@})} |
11283 | 58 ## |
59 ## @var{dialog_name} can be used to customize the dialog title. | |
11587
c792872f8942
all script files: untabify and strip trailing whitespace
John W. Eaton <jwe@octave.org>
parents:
11583
diff
changeset
|
60 ## If @var{default_file} is given it is preselected in the GUI dialog. |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
61 ## If, in addition, a path is given it is also used as current path. |
27831
b42e4b3dee5d
uigetfile.m, uiputfile.m: Add documentation for output arguments (bug #55419).
Markus Mützel <markus.muetzel@gmx.de>
parents:
27263
diff
changeset
|
62 ## |
27908
f658d41003e4
Document FLTIDX in uigetfile/uiputfile (bug #55419)
Rik <rik@octave.org>
parents:
27831
diff
changeset
|
63 ## @var{fname} and @var{fpath} return the chosen name and path, respectively. |
f658d41003e4
Document FLTIDX in uigetfile/uiputfile (bug #55419)
Rik <rik@octave.org>
parents:
27831
diff
changeset
|
64 ## @var{fltidx} is the index in the list of filter extensions @var{flt} that |
f658d41003e4
Document FLTIDX in uigetfile/uiputfile (bug #55419)
Rik <rik@octave.org>
parents:
27831
diff
changeset
|
65 ## was selected. |
27831
b42e4b3dee5d
uigetfile.m, uiputfile.m: Add documentation for output arguments (bug #55419).
Markus Mützel <markus.muetzel@gmx.de>
parents:
27263
diff
changeset
|
66 ## |
15532
95d7475a0a89
doc: Add seealso links between uigetfile, uiputfile, uigetdir.
Rik <rik@octave.org>
parents:
15467
diff
changeset
|
67 ## @seealso{uigetfile, uigetdir} |
11283 | 68 ## @end deftypefn |
69 | |
70 function [retfile, retpath, retindex] = uiputfile (varargin) | |
71 | |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
72 if (nargin > 3) |
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
73 print_usage (); |
11283 | 74 endif |
75 | |
19833
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
76 ## Preset default values |
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
77 outargs = {cell(0, 2), # File Filter |
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
78 "Save File", # Dialog Title |
20713
2469d78a1d8b
Consistently use 'filename' rather than 'file name' throughout code base.
Rik <rik@octave.org>
parents:
19848
diff
changeset
|
79 "", # Default filename |
19833
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
80 "create", |
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
81 pwd}; # Default directory |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
82 |
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
83 if (nargin > 0) |
21843
f7a57b07c81d
Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183).
Rik <rik@octave.org>
parents:
21841
diff
changeset
|
84 [outargs{1}, outargs{3}, defdir] = __file_filter__ ("uiputfile", |
f7a57b07c81d
Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183).
Rik <rik@octave.org>
parents:
21841
diff
changeset
|
85 varargin{1}); |
f7a57b07c81d
Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183).
Rik <rik@octave.org>
parents:
21841
diff
changeset
|
86 if (! isempty (defdir)) |
30196
813b7827c5f8
Remove "position" argument from file dialog functions (bug #60980).
Markus Mützel <markus.muetzel@gmx.de>
parents:
30195
diff
changeset
|
87 outargs{5} = defdir; |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
88 endif |
13697
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
89 else |
21843
f7a57b07c81d
Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183).
Rik <rik@octave.org>
parents:
21841
diff
changeset
|
90 outargs{1} = __file_filter__ ("uiputfile", outargs{1}); |
11283 | 91 endif |
92 | |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
93 if (nargin > 1) |
13697
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
94 if (ischar (varargin{2})) |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
95 outargs{2} = varargin{2}; |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
96 elseif (! isempty (varargin{2})) |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
97 print_usage (); |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
98 endif |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
99 endif |
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
100 |
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
101 if (nargin > 2) |
13697
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
102 if (ischar (varargin{3})) |
25781
e04c56bbbace
isdir.m: Make m-file a legacy function (bug #54489)
Rik <rik@octave.org>
parents:
25054
diff
changeset
|
103 if (isfolder (varargin{3})) |
19740
ca6fc882177d
Fix working directory of Figure Save dialog between CLI and GUI (bug #44175).
Rik <rik@octave.org>
parents:
19697
diff
changeset
|
104 fdir = varargin{3}; |
ca6fc882177d
Fix working directory of Figure Save dialog between CLI and GUI (bug #44175).
Rik <rik@octave.org>
parents:
19697
diff
changeset
|
105 fname = fext = ""; |
ca6fc882177d
Fix working directory of Figure Save dialog between CLI and GUI (bug #44175).
Rik <rik@octave.org>
parents:
19697
diff
changeset
|
106 else |
ca6fc882177d
Fix working directory of Figure Save dialog between CLI and GUI (bug #44175).
Rik <rik@octave.org>
parents:
19697
diff
changeset
|
107 [fdir, fname, fext] = fileparts (varargin{3}); |
ca6fc882177d
Fix working directory of Figure Save dialog between CLI and GUI (bug #44175).
Rik <rik@octave.org>
parents:
19697
diff
changeset
|
108 endif |
13697
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
109 if (! isempty (fdir)) |
30196
813b7827c5f8
Remove "position" argument from file dialog functions (bug #60980).
Markus Mützel <markus.muetzel@gmx.de>
parents:
30195
diff
changeset
|
110 outargs{5} = fdir; |
13697
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
111 endif |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
112 if (! isempty (fname) || ! isempty (fext)) |
20778
8513c84a13cb
Use parser string concatenation rather than strcat() for performance in m-files.
Rik <rik@octave.org>
parents:
20713
diff
changeset
|
113 outargs{3} = [fname fext]; |
13697
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
114 endif |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
115 elseif (! isempty (varargin{3})) |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
116 print_usage (); |
0f8ff98929b2
Allow a toolkit to provide its own version of UI dialogs.
Michael Goffioul <michael.goffioul@gmail.com>
parents:
13215
diff
changeset
|
117 endif |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
118 endif |
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
119 |
30195
a7981aa5822b
event-manager: Add function to signal valid implementation of GUI dialogs (bug #60980).
Markus Mützel <markus.muetzel@gmx.de>
parents:
29358
diff
changeset
|
120 if (__event_manager_have_dialogs__ ()) |
27263
99aa1bcb8848
rename octave_link and octave_link_events classes, move inside octave namespace
John W. Eaton <jwe@octave.org>
parents:
26376
diff
changeset
|
121 [retfile, retpath, retindex] = __event_manager_file_dialog__ (outargs{:}); |
16581
fa4a035e0cf4
Add octave_link uiputfile implementation
John Donoghue <john.donoghue@ieee.org>
parents:
15532
diff
changeset
|
122 else |
19833
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
123 funcname = __get_funcname__ (mfilename ()); |
16581
fa4a035e0cf4
Add octave_link uiputfile implementation
John Donoghue <john.donoghue@ieee.org>
parents:
15532
diff
changeset
|
124 [retfile, retpath, retindex] = feval (funcname, outargs{:}); |
fa4a035e0cf4
Add octave_link uiputfile implementation
John Donoghue <john.donoghue@ieee.org>
parents:
15532
diff
changeset
|
125 endif |
12522
33bbae85769a
Add uimenu, uigetdir, uigetfile, and uiputfile to documentation.
Rik <octave@nomad.inbox5.com>
parents:
12183
diff
changeset
|
126 |
19833
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
127 ## Append extension to the name if it isn't already added. |
9fc020886ae9
maint: Clean up m-files to follow Octave coding conventions.
Rik <rik@octave.org>
parents:
19799
diff
changeset
|
128 if (ischar (retfile)) |
21841
cf690a73a186
uiputfile.m: Correctly handle '*.*' filter type (bug #48182).
Rik <rik@octave.org>
parents:
20852
diff
changeset
|
129 [~, ~, ext] = fileparts (retfile); |
cf690a73a186
uiputfile.m: Correctly handle '*.*' filter type (bug #48182).
Rik <rik@octave.org>
parents:
20852
diff
changeset
|
130 if (isempty (ext)) |
cf690a73a186
uiputfile.m: Correctly handle '*.*' filter type (bug #48182).
Rik <rik@octave.org>
parents:
20852
diff
changeset
|
131 ext = outargs{1}{retindex}; |
cf690a73a186
uiputfile.m: Correctly handle '*.*' filter type (bug #48182).
Rik <rik@octave.org>
parents:
20852
diff
changeset
|
132 ext = strrep (ext, "*", ""); |
21843
f7a57b07c81d
Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183).
Rik <rik@octave.org>
parents:
21841
diff
changeset
|
133 if (! strcmp (ext, '.')) |
21841
cf690a73a186
uiputfile.m: Correctly handle '*.*' filter type (bug #48182).
Rik <rik@octave.org>
parents:
20852
diff
changeset
|
134 [~, ~, ext] = fileparts (ext); # paranoid checking of extension |
19362
7c31a83e25bc
uiputfile: add extension to file name (Bug #43687)
John Donoghue <john.donoghue@ieee.org>
parents:
17744
diff
changeset
|
135 retfile = [retfile ext]; |
7c31a83e25bc
uiputfile: add extension to file name (Bug #43687)
John Donoghue <john.donoghue@ieee.org>
parents:
17744
diff
changeset
|
136 endif |
7c31a83e25bc
uiputfile: add extension to file name (Bug #43687)
John Donoghue <john.donoghue@ieee.org>
parents:
17744
diff
changeset
|
137 endif |
7c31a83e25bc
uiputfile: add extension to file name (Bug #43687)
John Donoghue <john.donoghue@ieee.org>
parents:
17744
diff
changeset
|
138 endif |
7c31a83e25bc
uiputfile: add extension to file name (Bug #43687)
John Donoghue <john.donoghue@ieee.org>
parents:
17744
diff
changeset
|
139 |
11283 | 140 endfunction |
141 | |
14237
11949c9795a0
Revamp %!demos in m-files to use Octave coding conventions on spacing, etc.
Rik <octave@nomad.inbox5.com>
parents:
14138
diff
changeset
|
142 |
11583
c4c2cd67c440
Fixes for ui file functions, bug#32190
Kai Habel <kai.habel@gmx.de>
parents:
11576
diff
changeset
|
143 %!demo |
14245
4506eade9f04
Use Matlab coding conventions for demos in plot/ directory.
Rik <octave@nomad.inbox5.com>
parents:
14237
diff
changeset
|
144 %! uiputfile ({'*.gif;*.png;*.jpg', 'Supported Picture Formats'}); |
13215 | 145 |
146 ## Remove from test statistics. No real tests possible. | |
14237
11949c9795a0
Revamp %!demos in m-files to use Octave coding conventions on spacing, etc.
Rik <octave@nomad.inbox5.com>
parents:
14138
diff
changeset
|
147 %!assert (1) |