Changeset 2394

Timestamp:

10/08/09 09:12:58 (15 years ago)

Author:

Mathieu Morlighem

Message:

Added addfield.m

Location:

issm/trunk/src/m/classes/@pairoptions

Files:

• addfield.m (added)
• changefieldvalue.m (modified) (2 diffs)

issm/trunk/src/m/classes/@pairoptions/changefieldvalue.m

@@ -4 +4 @@
 %   Usage:
 %      pairoptions=changefieldvalue(pairoptions,field,newvalue)
+%
+%   the value associated with all the fields equal to the one given in
+%   input will be modified. If no field is foud, the field will be to
+%   the option list added
 
 %track occurance of field
@@ -9 +13 @@
 
 %replace value
-for i=1:length(lines),
-        pairoptions.list{lines(i),2}=newvalue;
+if isempty(lines),
+        %add new field if not found
+        pairoptions=addfield(pairoptions,field,newvalue);
+else
+        for i=1:length(lines),
+                pairoptions.list{lines(i),2}=newvalue;
+        end
 end