Mercurial > hg > octave-nkf

diff scripts/deprecated/com2str.m @ 4898:8fd9495f5054

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2004-06-04 13:29:33 by jwe]
author jwe
date Fri, 04 Jun 2004 13:29:34 +0000
parents 4eaf35cfdb11
children 4c8a2e4e0717
line wrap: on
line diff
--- a/scripts/deprecated/com2str.m
+++ b/scripts/deprecated/com2str.m
@@ -65,7 +65,7 @@
     ## strictly an imaginary number
     switch (flg)
       case(0)
-	retval = num2str (iz);
+	retval = [num2str(iz), "i"];
       case(1)
 	retval = [sgns(1+(iz<0)), " ", num2str(abs(iz)), "i"];
     endswitch