Mercurial > hg > octave-nkf

diff scripts/control/util/zgshsr.m @ 4030:22bd65326ec1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-08-09 18:58:13 by jwe]
author jwe
date Fri, 09 Aug 2002 19:00:16 +0000
parents 7923abdeb4e5
children 3e48e60a1f8b
line wrap: on
line diff
--- a/scripts/control/util/zgshsr.m
+++ b/scripts/control/util/zgshsr.m
@@ -29,7 +29,7 @@
 
 function x = zgshsr (y)
 
-  if(!is_vector(y))
+  if(!isvector(y))
     error(sprintf("y(%dx%d) must be a vector",rows(y),columns(y)));
   endif
   x = vec(y);