Attachment 222410 Details for Bug 374364

example code with selector widgets

selector.ycp (text/plain), 1.00 KB, created by Jiří Suchomel on 2008-06-17 07:25:44 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Jiří Suchomel

Created: 2008-06-17 07:25:44 UTC

Size: 1.00 KB

patch

obsolete

>{
>    import "Popup";
>    import "Wizard";
>
>    symbol detailedSelection ()
>    {
>	UI::OpenDialog (`opt(`defaultsize),
>	    `ReplacePoint(`id( `rep), `Label ("Reading package database..."))
>	);
>
>	UI::ReplaceWidget (`rep, `PackageSelector(`id(`packages )));
>
>	symbol result = (symbol) UI::RunPkgSelection (`id(`packages ));
>
>	UI::CloseDialog();
>
>	y2internal ("Package selector returned  %1", result);
>	return result;
>    }
>
>    Wizard::CreateDialog ();
>
>    Wizard::SetContents (
>	"Software Selection",
>	`PatternSelector(`id(`patterns ) ),
>	"",
>	true, true
>    );
>
>
>    symbol result = nil;
>
>    repeat
>    {
>	result = (symbol) UI::RunPkgSelection(`id(`patterns ) );
>	if ( result == `details )
>	{
>		result = detailedSelection ();
>y2internal ("res %1", result);
>y2internal ("exists %1", UI::WidgetExists (`id (`patterns)));
>Popup::Message (sformat ("%1", result));
>		if ( result == `cancel )
>		{
>		    result = nil;
>		    continue;
>		}
>
>	}
>    } until ( result == `cancel || result == `accept );
>    Wizard::CloseDialog ();
>}

Actions: View

Attachments on bug 374364: 222410