Mercurial > hg > octave-nkf

diff scripts/general/prepad.m @ 7208:a730e47fda4d

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2007-11-28 02:32:41 by jwe]
author jwe
date Wed, 28 Nov 2007 02:32:42 +0000
parents a1dbe9d80eee
children 342f72c1df1a
line wrap: on
line diff
--- a/scripts/general/prepad.m
+++ b/scripts/general/prepad.m
@@ -83,10 +83,10 @@
   if (d >= l)
     idx = cell ();
     for i = 1:nd
-      idx {i} = 1:sz(i);
+      idx{i} = 1:sz(i);
     endfor
-    idx {dim} = d-l+1:d;
-    y = x (idx {:});
+    idx{dim} = d-l+1:d;
+    y = x(idx{:});
   else
     sz (dim) = l - d;
     y = cat (dim, c * ones (sz), x);