comparison scripts/plot/__patch__.m @ 8190:73d6b71788c0

use case-insensitive comparison for graphics properties; misc style fixes
author John W. Eaton <jwe@octave.org>
date Mon, 06 Oct 2008 21:06:05 -0400
parents 263bcc319233
children 7d48766c21a5
comparison
equal deleted inserted replaced
8189:8e8afefe9466 8190:73d6b71788c0
51 z = varargin{3}; 51 z = varargin{3};
52 have_z = true; 52 have_z = true;
53 iarg++; 53 iarg++;
54 endif 54 endif
55 elseif (ischar (varargin{1}) 55 elseif (ischar (varargin{1})
56 && (strcmp (tolower (varargin{1}), "faces") 56 && (strcmpi (varargin{1}, "faces")
57 || strcmp (tolower (varargin{1}), "vertices"))) 57 || strcmpi (varargin{1}, "vertices")))
58 if (! isnumeric (varargin{2})) 58 if (! isnumeric (varargin{2}))
59 fail = true; 59 fail = true;
60 return; 60 return;
61 endif 61 endif
62 62
63 if (strcmp (tolower (varargin{1}), "faces")) 63 if (strcmpi (varargin{1}, "faces"))
64 faces = varargin{2}; 64 faces = varargin{2};
65 if (strcmp (tolower (varargin{3}), "vertices")) 65 if (strcmpi (varargin{3}, "vertices"))
66 vert = varargin{4}; 66 vert = varargin{4};
67 have_faces = true; 67 have_faces = true;
68 endif 68 endif
69 elseif (strcmp (tolower (varargin{3}), "vertices")) 69 elseif (strcmpi (varargin{3}, "vertices"))
70 vert = varargin{2}; 70 vert = varargin{2};
71 if (strcmp (tolower (varargin{3}), "faces")) 71 if (strcmpi (varargin{3}, "faces"))
72 faces = varargin{4}; 72 faces = varargin{4};
73 have_faces = true; 73 have_faces = true;
74 endif 74 endif
75 endif 75 endif
76 if (!have_faces) 76 if (!have_faces)