Mercurial > octave-nkf

diff scripts/general/int2str.m @ 9576:d73c9bd101ef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix int2str
author Jaroslav Hajek <highegg@gmail.com>
date Thu, 27 Aug 2009 07:54:44 +0200
parents eb63fbe60fab
children 95c3e38098bf
line wrap: on
line diff
--- a/scripts/general/int2str.m	Tue Aug 25 14:03:30 2009 +0200
+++ b/scripts/general/int2str.m	Thu Aug 27 07:54:44 2009 +0200
@@ -102,7 +102,7 @@
       fmt = sprintf ("%%%dd", min_fw);
     else
       ## Could have anything.
-      tfw = floor (log10 (abs (t))) + 1 + sep;
+      tfw = floor (log10 (double (abs (t)))) + 1 + sep;
       fw = max (tfw);
       if (any (t(tfw == fw) < 0))
 	fw++;