octave: scripts/gui/uiputfile.m annotate

annotate scripts/gui/uiputfile.m @ 30196:813b7827c5f8

Remove "position" argument from file dialog functions (bug #60980). * libinterp/corefcn/event-manager.cc (F__event_manager_file_dialog__), libinterp/dldfcn/__fltk_uigetfile (F__fltk_uigetfile__): Remove unused argument "position". * scripts/gui/uigetdir.m, scripts/gui/uigetfile.m, scripts/gui/uiputfile.m, scripts/gui/private/__uigetdir_fltk__.m, scripts/gui/private/__uigetfile_fltk__.m, scripts/gui/private/__uiputfile_fltk__.m: Remove handling argument "position".

author	Markus Mützel <markus.muetzel@gmx.de>
date	Sun, 19 Sep 2021 17:06:26 +0200
parents	a7981aa5822b
children	796f54d4ddbf

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 ##
29358 0a5b15007766 update Octave Project Developers copyright for the new year John W. Eaton <jwe@octave.org> parents: 27978 diff changeset	3 ## Copyright (C) 2010-2021 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 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	7 ##
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	8 ## This file is part of Octave.
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	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 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	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 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	14 ##
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	15 ## Octave is distributed in the hope that it will be useful, but
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	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 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	19 ##
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	20 ## You should have received a copy of the GNU General Public License
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	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 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	25
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	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 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	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
b42e4b3dee5d uigetfile.m, uiputfile.m: Add documentation for output arguments (bug #55419). Markus Mützel <markus.muetzel@gmx.de> parents: 27263 diff changeset	40 ## filename is selected as default file. Example: @code{uiputfile ("myfun.m")}
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	41 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 16581 diff changeset	42 ## @item @qcode{"*.ext"}
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11583 diff changeset	43 ## 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	44 ## Example: @code{uiputfile ("*.ext")}
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	45 ##
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 16581 diff changeset	46 ## @item @code{@{"*.ext", "My Description"@}}
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	47 ## A 2-column cell array containing the file extension in the 1st column and
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	48 ## 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	49 ## 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	50 ## "XYZ-Format"@})}
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	51 ## @end table
11587 c792872f8942 all script files: untabify and strip trailing whitespace John W. Eaton <jwe@octave.org> parents: 11583 diff changeset	52 ##
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	53 ## The filter string can also contain a semicolon separated list of filter
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	54 ## extensions.
17281 bc924baa2c4e doc: Add new @qcode macro for code samples which are quoted. Rik <rik@octave.org> parents: 16581 diff changeset	55 ## 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	56 ## "Supported Picture Formats"@})}
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	57 ##
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	58 ## @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	59 ## 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	60 ## 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	61 ##
27908 f658d41003e4 Document FLTIDX in uigetfile/uiputfile (bug #55419) Rik <rik@octave.org> parents: 27831 diff changeset	62 ## @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	63 ## @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	64 ## 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	65 ##
15532 95d7475a0a89 doc: Add seealso links between uigetfile, uiputfile, uigetdir. Rik <rik@octave.org> parents: 15467 diff changeset	66 ## @seealso{uigetfile, uigetdir}
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	67 ## @end deftypefn
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	68
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	69 function [retfile, retpath, retindex] = uiputfile (varargin)
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	70
12522 33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	71 if (nargin > 3)
33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	72 print_usage ();
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	73 endif
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	74
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19799 diff changeset	75 ## Preset default values
9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19799 diff changeset	76 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	77 "Save File", # Dialog Title
20713 2469d78a1d8b Consistently use 'filename' rather than 'file name' throughout code base. Rik <rik@octave.org> parents: 19848 diff changeset	78 "", # Default filename
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19799 diff changeset	79 "create",
9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19799 diff changeset	80 pwd}; # Default directory
12522 33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	81
33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	82 if (nargin > 0)
21843 f7a57b07c81d Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183). Rik <rik@octave.org> parents: 21841 diff changeset	83 [outargs{1}, outargs{3}, defdir] = __file_filter__ ("uiputfile",
f7a57b07c81d Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183). Rik <rik@octave.org> parents: 21841 diff changeset	84 varargin{1});
f7a57b07c81d Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183). Rik <rik@octave.org> parents: 21841 diff changeset	85 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	86 outargs{5} = defdir;
12522 33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	87 endif
13697 0f8ff98929b2 Allow a toolkit to provide its own version of UI dialogs. Michael Goffioul <michael.goffioul@gmail.com> parents: 13215 diff changeset	88 else
21843 f7a57b07c81d Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183). Rik <rik@octave.org> parents: 21841 diff changeset	89 outargs{1} = __file_filter__ ("uiputfile", outargs{1});
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	90 endif
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	91
12522 33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	92 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	93 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	94 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	95 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	96 print_usage ();
0f8ff98929b2 Allow a toolkit to provide its own version of UI dialogs. Michael Goffioul <michael.goffioul@gmail.com> parents: 13215 diff changeset	97 endif
12522 33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	98 endif
33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	99
33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	100 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	101 if (ischar (varargin{3}))
25781 e04c56bbbace isdir.m: Make m-file a legacy function (bug #54489) Rik <rik@octave.org> parents: 25054 diff changeset	102 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	103 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	104 fname = fext = "";
ca6fc882177d Fix working directory of Figure Save dialog between CLI and GUI (bug #44175). Rik <rik@octave.org> parents: 19697 diff changeset	105 else
ca6fc882177d Fix working directory of Figure Save dialog between CLI and GUI (bug #44175). Rik <rik@octave.org> parents: 19697 diff changeset	106 [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	107 endif
13697 0f8ff98929b2 Allow a toolkit to provide its own version of UI dialogs. Michael Goffioul <michael.goffioul@gmail.com> parents: 13215 diff changeset	108 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	109 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	110 endif
0f8ff98929b2 Allow a toolkit to provide its own version of UI dialogs. Michael Goffioul <michael.goffioul@gmail.com> parents: 13215 diff changeset	111 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	112 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	113 endif
0f8ff98929b2 Allow a toolkit to provide its own version of UI dialogs. Michael Goffioul <michael.goffioul@gmail.com> parents: 13215 diff changeset	114 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	115 print_usage ();
0f8ff98929b2 Allow a toolkit to provide its own version of UI dialogs. Michael Goffioul <michael.goffioul@gmail.com> parents: 13215 diff changeset	116 endif
12522 33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	117 endif
33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	118
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	119 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	120 [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	121 else
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19799 diff changeset	122 funcname = __get_funcname__ (mfilename ());
16581 fa4a035e0cf4 Add octave_link uiputfile implementation John Donoghue <john.donoghue@ieee.org> parents: 15532 diff changeset	123 [retfile, retpath, retindex] = feval (funcname, outargs{:});
fa4a035e0cf4 Add octave_link uiputfile implementation John Donoghue <john.donoghue@ieee.org> parents: 15532 diff changeset	124 endif
12522 33bbae85769a Add uimenu, uigetdir, uigetfile, and uiputfile to documentation. Rik <octave@nomad.inbox5.com> parents: 12183 diff changeset	125
19833 9fc020886ae9 maint: Clean up m-files to follow Octave coding conventions. Rik <rik@octave.org> parents: 19799 diff changeset	126 ## 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	127 if (ischar (retfile))
21841 cf690a73a186 uiputfile.m: Correctly handle '.' filter type (bug #48182). Rik <rik@octave.org> parents: 20852 diff changeset	128 [~, ~, ext] = fileparts (retfile);
cf690a73a186 uiputfile.m: Correctly handle '.' filter type (bug #48182). Rik <rik@octave.org> parents: 20852 diff changeset	129 if (isempty (ext))
cf690a73a186 uiputfile.m: Correctly handle '.' filter type (bug #48182). Rik <rik@octave.org> parents: 20852 diff changeset	130 ext = outargs{1}{retindex};
cf690a73a186 uiputfile.m: Correctly handle '.' filter type (bug #48182). Rik <rik@octave.org> parents: 20852 diff changeset	131 ext = strrep (ext, "*", "");
21843 f7a57b07c81d Overhaul uigetfile, uiputfile, __file_filter__ (bug #48183). Rik <rik@octave.org> parents: 21841 diff changeset	132 if (! strcmp (ext, '.'))
21841 cf690a73a186 uiputfile.m: Correctly handle '.' filter type (bug #48182). Rik <rik@octave.org> parents: 20852 diff changeset	133 [~, ~, 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	134 retfile = [retfile ext];
7c31a83e25bc uiputfile: add extension to file name (Bug #43687) John Donoghue <john.donoghue@ieee.org> parents: 17744 diff changeset	135 endif
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
11283 58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	139 endfunction
58f175d39a7a GUI file functions Kai Habel <kai.habel@gmx.de> parents: diff changeset	140
14237 11949c9795a0 Revamp %!demos in m-files to use Octave coding conventions on spacing, etc. Rik <octave@nomad.inbox5.com> parents: 14138 diff changeset	141
11583 c4c2cd67c440 Fixes for ui file functions, bug#32190 Kai Habel <kai.habel@gmx.de> parents: 11576 diff changeset	142 %!demo
14245 4506eade9f04 Use Matlab coding conventions for demos in plot/ directory. Rik <octave@nomad.inbox5.com> parents: 14237 diff changeset	143 %! uiputfile ({'.gif;.png;*.jpg', 'Supported Picture Formats'});
13215 cb8fd692b600 Add tests for scripts/plot Kai Habel <kai.habel@gmx.de> parents: 12522 diff changeset	144
cb8fd692b600 Add tests for scripts/plot Kai Habel <kai.habel@gmx.de> parents: 12522 diff changeset	145 ## 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	146 %!assert (1)

Mercurial > octave

annotate scripts/gui/uiputfile.m @ 30196:813b7827c5f8