Changeset 1165 for trunk/src/geometry_calib.m

Timestamp:

Jul 30, 2024, 6:44:35 PM (2 months ago)

Author:

sommeria

Message:

various bugs repaired

File:

• trunk/src/geometry_calib.m (modified) (1 diff)

trunk/src/geometry_calib.m

@@ -850 +850 @@
     end
     outputfile=[filebase '.xml'];
-    [~,RootFile]=fileparts(filebase);
-    [~,~,errormsg]=update_imadoc(RootPath,SubDir,'GeometryCalib',GeometryCalib,0);
-    if ~strcmp(errormsg,'')
-        msgbox_uvmat('ERROR',errormsg);
+ %   [~,RootFile]=fileparts(filebase);
+
+    t=xmltree;
+    t=set(t,1,'name','ImaDoc');
+    [t,uid_calib]=add(t,1,'element','GeometryCalib');
+   % xmlfile=[filebase '.xml'];
+    t=struct2xml(GeometryCalib,t,uid_calib);
+    save(t)
+    try
+        save(t,outputfile);
+    catch ME
+        errormsg=['error in saving ' outputfile ': ' ME.message];
+         msgbox_uvmat('ERROR',errormsg);
     end
     listfile=get(handles.ListCoordFiles,'string');