Mercurial > hg > octave-nkf

diff scripts/strings/strrep.m @ 3670:0287dfeb1f34

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2000-05-24 18:41:37 by jwe]
author jwe
date Wed, 24 May 2000 18:41:38 +0000
parents f7f94396dd81
children ef883684e58e
line wrap: on
line diff
--- a/scripts/strings/strrep.m
+++ b/scripts/strings/strrep.m
@@ -74,7 +74,7 @@
     ## target positions to account for any expansion or contraction
     ## of s that may have occurred.
     ind = ind + jump * [0:length(ind)-1];
-    repeat = [1:length(y))]' * ones (1, length (ind));
+    repeat = [1:length(y)]' * ones (1, length (ind));
     dest = ones (length (y), 1) * ind + repeat - 1;
     t (dest) = y (repeat);
   else                        # deletion