Index: /issm/trunk/src/m/classes/@pairoptions/addfield.m
===================================================================
--- /issm/trunk/src/m/classes/@pairoptions/addfield.m	(revision 2394)
+++ /issm/trunk/src/m/classes/@pairoptions/addfield.m	(revision 2394)
@@ -0,0 +1,10 @@
+function pairoptions=addfield(pairoptions,field,value),
+%ADDFIELD - add a field to an options list
+%
+%   Usage:
+%      pairoptions=addfield(pairoptions,field,value)
+
+if ischar(field),
+	pairoptions.list{end+1,1}=field;
+	pairoptions.list{end,2}=value;
+end
Index: /issm/trunk/src/m/classes/@pairoptions/changefieldvalue.m
===================================================================
--- /issm/trunk/src/m/classes/@pairoptions/changefieldvalue.m	(revision 2393)
+++ /issm/trunk/src/m/classes/@pairoptions/changefieldvalue.m	(revision 2394)
@@ -4,4 +4,8 @@
 %   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,5 +13,10 @@
 
 %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