Mercurial > hg > octave-jordi

comparison scripts/@ftp/mput.m @ 9880:7f77e5081e83

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Add ftp objects
author David Bateman <dbateman@free.fr>
date Sat, 28 Nov 2009 11:44:57 +0100
parents
children fbd7843974fa
comparison
equal deleted inserted replaced
9879:034677ab6865 9880:7f77e5081e83
1 ## Copyright (C) 2009 David Bateman
2 ##
3 ## This program is free software; you can redistribute it and/or modify
4 ## it under the terms of the GNU General Public License as published by
5 ## the Free Software Foundation; either version 2 of the License, or
6 ## (at your option) any later version.
7 ##
8 ## This program is distributed in the hope that it will be useful,
9 ## but WITHOUT ANY WARRANTY; without even the implied warranty of
10 ## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
11 ## GNU General Public License for more details.
12 ##
13 ## You should have received a copy of the GNU General Public License
14 ## along with this program; If not, see <http://www.gnu.org/licenses/>.
15
16 ## -*- texinfo -*-
17 ## @deftypefn {Function File} {} mput (@var{f}, @var{file})
18 ## Upload the local file @var{file} into the current remote directory on
19 ## the FTP connection @var{f}. @var{f} is an FTP object returned by the
20 ## ftp function.
21 ##
22 ## The argument @var{file} is passed by the @dfn{glob} function and any
23 ## files that match the wildcards in @var{file} will be uploaded.
24 ## @end deftypefn
25
26 function retval = mput (obj, file)
27 if (nargout == 0)
28 __ftp_mput__ (obj.curlhandle, file);
29 else
30 retval = __ftp_mput__ (obj.curlhandle, file);
31 endif
32 endfunction