function project_UI(args)
    PROJECTPATH = 'projects';
    
    frameWidth=450;
    frameHeight=50;
    model.frame = figure('Visible','off','Position',[0,0,frameWidth,frameHeight]);
    movegui(model.frame,'west'); % get this thing visible on smaller displays.

    set(model.frame,'Name','SVM CrossVal Decode Performance 4 SPM, Projectchooser');
    set(model.frame,'NumberTitle','off');
    set(model.frame,'MenuBar','none');
    set(model.frame,'Color',get(0,'defaultUicontrolBackgroundColor'));
    set(model.frame,'Resize','off');
    set(model.frame,'Units','normalize');

    newProjectMenu = uimenu(model.frame,'Label','Define New Project');
    set(newProjectMenu,'Enable','off');

    d = dir(fullfile(PROJECTPATH,'*.m'));
    
    model.projectSelection = uicontrol(model.frame,'Style','popupmenu',...
                    'String',{d.name},...
                    'Value',1,...  % default selected item
                    'Position',[0.33*frameWidth 40 0.66*frameWidth 20]);
    set(model.projectSelection,'BackgroundColor','w');
    
    
    btnSelectButton = uicontrol(model.frame,'Tag','select','String','continue','Position',[2 0  frameWidth 20]);
    
%    model.projectSelector = 

	model.val = 1;

    set(btnSelectButton,'Callback',{@cbChooseProject,model}); % set here, because of model.    
    set(model.frame,'Visible','on');
end

function cbChooseProject(src,evnts,args)

	spm_SVMCrossVal(args);
	display(args);
	close(args.frame)
end