[Octave-cvsupdate] SF.net SVN: octave: [5093] trunk/octave-forge

[<ad...@us...>]

Revision: 5093
          http://octave.svn.sourceforge.net/octave/?rev=5093&view=rev
Author:   adb014
Date:     2008-06-05 02:51:38 -0700 (Thu, 05 Jun 2008)

Log Message:
-----------
Replace isstr with ischar everywhere

Modified Paths:
--------------
    trunk/octave-forge/extra/graceplot/inst/grace_octave_path.m
    trunk/octave-forge/extra/pdb/inst/plotpdb.m
    trunk/octave-forge/main/image/inst/imread.m
    trunk/octave-forge/nonfree/arpack/inst/svds.m

Modified: trunk/octave-forge/extra/graceplot/inst/grace_octave_path.m
===================================================================
--- trunk/octave-forge/extra/graceplot/inst/grace_octave_path.m	2008-06-05 09:50:57 UTC (rev 5092)
+++ trunk/octave-forge/extra/graceplot/inst/grace_octave_path.m	2008-06-05 09:51:38 UTC (rev 5093)
@@ -28,7 +28,7 @@
 
   if (nargin == 0)
     path = __pl_grace_octave_path;
-  elseif (nargin == 1 && isstr(path))
+  elseif (nargin == 1 && ischar (path))
     if (path(length (path)) != '/')
       path = [path "//"];
     elseif (path(length (path)-1) != '/')

Modified: trunk/octave-forge/extra/pdb/inst/plotpdb.m
===================================================================
--- trunk/octave-forge/extra/pdb/inst/plotpdb.m	2008-06-05 09:50:57 UTC (rev 5092)
+++ trunk/octave-forge/extra/pdb/inst/plotpdb.m	2008-06-05 09:51:38 UTC (rev 5093)
@@ -49,7 +49,7 @@
 #++plotpdb_static_ptynum;
 #ptyname = sprintf("%s%c", ptybase, plotpdb_static_ptynum)
 
-if(isstr(pdb))
+if(ischar (pdb))
     fname = pdb;
     [forkstat, fmsg] = fork();
     if(forkstat == 0),

Modified: trunk/octave-forge/main/image/inst/imread.m
===================================================================
--- trunk/octave-forge/main/image/inst/imread.m	2008-06-05 09:50:57 UTC (rev 5092)
+++ trunk/octave-forge/main/image/inst/imread.m	2008-06-05 09:51:38 UTC (rev 5093)
@@ -43,7 +43,7 @@
       usage("I = imread(filename)")
     endif
 
-    if !isstr(filename)
+    if !ischar (filename)
       error("imread: filename must be a string")
     endif
 

Modified: trunk/octave-forge/nonfree/arpack/inst/svds.m
===================================================================
--- trunk/octave-forge/nonfree/arpack/inst/svds.m	2008-06-05 09:50:57 UTC (rev 5092)
+++ trunk/octave-forge/nonfree/arpack/inst/svds.m	2008-06-05 09:51:38 UTC (rev 5093)
@@ -147,7 +147,7 @@
     endif
     s = diag(s);
 
-    if (isstr(sigma))
+    if (ischar(sigma))
       norma = max(s);
     else
       norma = normest(a);


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.