Mercurial > octave-antonio
diff scripts/strings/strjust.m @ 11587:c792872f8942
all script files: untabify and strip trailing whitespace
author | John W. Eaton <jwe@octave.org> |
---|---|
date | Thu, 20 Jan 2011 17:35:29 -0500 |
parents | 3c6e8aaa9555 |
children | f3b665972bb5 |
line wrap: on
line diff
--- a/scripts/strings/strjust.m Thu Jan 20 17:24:59 2011 -0500 +++ b/scripts/strings/strjust.m Thu Jan 20 17:35:29 2011 -0500 @@ -21,7 +21,7 @@ ## @deftypefn {Function File} {} strjust (@var{s}, @var{pos}) ## Return the text, @var{s}, justified according to @var{pos}, which may ## be @samp{"left"}, @samp{"center"}, or @samp{"right"}. If @var{pos} -## is omitted, @samp{"right"} is assumed. +## is omitted, @samp{"right"} is assumed. ## ## Null characters are replaced by spaces. All other character ## data are treated as non-white space. @@ -88,7 +88,7 @@ mins(flipud (idx(:))) = flipud (jdx(:)); maxs = nc * ones (nr, 1); maxs(idx) = jdx; - shift = floor ((nc + 1 - maxs - mins) / 2); + shift = floor ((nc + 1 - maxs - mins) / 2); endif ## Adjust the column indices.