Mercurial > hg > octave-nkf

diff scripts/plot/daspect.m @ 11120:a44f979a35ce

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style fixes for some .m files
author John W. Eaton <jwe@octave.org>
date Wed, 20 Oct 2010 20:49:17 -0400
parents a8ac114ec9ab
children 2e32236eaa90
line wrap: on
line diff
--- a/scripts/plot/daspect.m
+++ b/scripts/plot/daspect.m
@@ -50,21 +50,21 @@
     if (numel (varargin) == 1)
       if (ischar (varargin{1})
           && any (strcmpi (varargin{1}, {"mode", "manual", "auto"})))
-        switch varargin{1}
-        case {"mode"}
+        switch (varargin{1})
+        case "mode"
           if (nargout < 2)
             varargout{1} = get (hax, "dataaspectratiomode");
             return
           else
             error ("daspect: only one output is allowed.")
           endif
-        case {"manual"}
+        case "manual"
           set (hax, "dataaspectratiomode", "manual");
-        case {"auto"}
+        case "auto"
           set (hax, "dataaspectratiomode", "auto");
         endswitch
       elseif (isreal (varargin{1})
-              && any (numel (varargin{1}) == [2 3]))
+              && any (numel (varargin{1}) == [2, 3]))
         set (hax, "dataaspectratio", varargin{1})
       else
         error ("daspect: invalid input.")