Mercurial > octave-nkf

comparison scripts/strings/cstrcat.m @ 10549:95c3e38098bf

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Untabify .m scripts
author Rik <code@nomad.inbox5.com>
date Fri, 23 Apr 2010 11:28:50 -0700
parents 58604c45ca74
children 693e22af08ae
comparison
equal deleted inserted replaced
10548:479536c5bb10 10549:95c3e38098bf
48 if (nargin > 0) 48 if (nargin > 0)
49 49
50 if (iscellstr (varargin)) 50 if (iscellstr (varargin))
51 ## All arguments are character strings. 51 ## All arguments are character strings.
52 unwind_protect 52 unwind_protect
53 tmp = warning ("query", "Octave:empty-list-elements"); 53 tmp = warning ("query", "Octave:empty-list-elements");
54 warning ("off", "Octave:empty-list-elements"); 54 warning ("off", "Octave:empty-list-elements");
55 st = [varargin{:}]; 55 st = [varargin{:}];
56 unwind_protect_cleanup 56 unwind_protect_cleanup
57 warning (tmp.state, "Octave:empty-list-elements"); 57 warning (tmp.state, "Octave:empty-list-elements");
58 end_unwind_protect 58 end_unwind_protect
59 else 59 else
60 error ("cstrcat: expecting arguments to character strings"); 60 error ("cstrcat: expecting arguments to character strings");
61 endif 61 endif
62 else 62 else