Mercurial > hg > octave-lyh

comparison scripts/strings/deblank.m @ 11589:b0084095098e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
missing semicolons in script files
author John W. Eaton <jwe@octave.org>
date Thu, 20 Jan 2011 18:26:09 -0500
parents fd0a3ac60b0e
children 1c71c9bf0570
comparison
equal deleted inserted replaced
11588:d5bd2766c640 11589:b0084095098e
39 39
40 if (! isempty (s)) 40 if (! isempty (s))
41 if (char_arg) 41 if (char_arg)
42 k = find (! isspace (s) & s != "\0"); 42 k = find (! isspace (s) & s != "\0");
43 else 43 else
44 warning ("deblank: expecting character string argument") 44 warning ("deblank: expecting character string argument");
45 k = find (s != 0); 45 k = find (s != 0);
46 endif 46 endif
47 47
48 if (isempty (k)) 48 if (isempty (k))
49 s = resize (s, 0, 0); 49 s = resize (s, 0, 0);