home *** CD-ROM | disk | FTP | other *** search
- /**
- * Module: inst_info.ycp
- *
- * Authors: Arvin Schnell <arvin@suse.de>
- *
- * Purpose: Show info in existent.
- *
- * $Id: inst_test_workflow.ycp 27936 2006-02-13 20:01:14Z olh $
- */
-
- {
-
- textdomain "installation";
-
- import "Label";
- import "Report";
- import "Wizard";
- import "ProductControl";
- import "GetInstArgs";
-
- map args = GetInstArgs::argmap();
-
- string caption = "Client: " + args["step_name"]:"none";
- string help = "Nothing here";
-
- term contents = `VBox(
- `Label("id: " + args["step_id"]:"none" )
- );
-
- //Wizard::SetContents (caption, contents, help, GetInstArgs::enable_back(), GetInstArgs::enable_next());
- Wizard::SetContents (caption, contents, help, true, true);
-
- symbol button = (symbol) UI::UserInput();
-
- return button;
- }
-