Changeset 7128 for issm/trunk/src/m/kml/kml_unsh_edges.m

Timestamp:

01/20/11 15:46:34 (14 years ago)

Author:

jschierm

Message:

kml: added parameter name checking to all kml functions.

File:

• issm/trunk/src/m/kml/kml_unsh_edges.m (modified) (1 diff)

issm/trunk/src/m/kml/kml_unsh_edges.m

@@ -39 +39 @@
 while (iarg <= nargin-1)
     if ischar(varargin{iarg})
-        eval([varargin{iarg} '=varargin{iarg+1};']);
-        if (numel(varargin{iarg+1}) <= 20)
-            disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+        if ~isempty(strmatch(varargin{iarg},...
+                {'alt','prtplt'},...
+                'exact'))
+            eval([varargin{iarg} '=varargin{iarg+1};']);
+            if (numel(varargin{iarg+1}) <= 20)
+                disp([varargin{iarg} '=' any2str(varargin{iarg+1}) ';']);
+            else
+                disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            end
         else
-            disp([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ';']);
+            if (numel(varargin{iarg+1}) <= 20)
+                warning([varargin{iarg} '=' any2str(varargin{iarg+1}) ' is not recognized.']);
+            else
+                warning([varargin{iarg} '=' string_size(varargin{iarg+1}) ' ' class(varargin{iarg+1}) ' is not recognized.']);
+            end
         end
     else