Changeset 694 for trunk/src/series.m

Timestamp:

Nov 4, 2013, 9:34:10 PM (11 years ago)

Author:

sommeria

Message:

create_grid now remember white or black marks
bug repaired for transform fct in series

File:

• trunk/src/series.m (modified) (2 diffs)

trunk/src/series.m

@@ -2590 +2590 @@
 % ff=functions(list_transform{end});
 if isequal(TransformName,'more...'); 
-%     coord_fct='';
-%     prompt = {'Enter the name of the transform function'};
-%     dlg_title = 'user defined transform';
-%     num_lines= 1;
-    [FileName, PathName] = uigetfile( ...
-       {'*.m', ' (*.m)';
-        '*.m',  '.m files '; ...
-        '*.*', 'All Files (*.*)'}, ...
-        'Pick a transform function',get(handles.TransformPath,'String'));
-    if isequal(FileName,0)
+%     [FileName, PathName] = uigetfile( ...
+%        {'*.m', ' (*.m)';
+%         '*.m',  '.m files '; ...
+%         '*.*', 'All Files (*.*)'}, ...
+%         'Pick a transform function',get(handles.TransformPath,'String'));
+    
+    FileName=uigetfile_uvmat('Pick a transform function',get(handles.TransformPath,'String'),'.m');
+    if isempty(FileName)
         return     %browser closed without choice
     end
-    if isequal(PathName(end),'/')||isequal(PathName(end),'\')
-        PathName(end)=[];
-    end
+%     if isequal(PathName(end),'/')||isequal(PathName(end),'\')
+%         PathName(end)=[];
+%     end
     [TransformPath,TransformName,TransformExt]=fileparts(FileName);% removes extension .m
     if ~strcmp(TransformExt,'.m')
@@ -2626 +2624 @@
            TransformPathListUser{ilist-nb_builtin_transform}=TransformPathList{ilist};
        end 
+       TransformPathListUser=TransformPathListUser';
+       TransformListUser=TransformListUser';
        save (profil_perso,'TransformPathListUser','TransformListUser','-append'); %store the root name for future opening of uvmat
    end