Mailinglist Archive: yast-commit (723 mails)

< Previous Next >
[yast-commit] r47421 - /trunk/gtk/tests/Wizard.ycp
  • From: michael_meeks@xxxxxxxxxxxxxxxx
  • Date: Fri, 09 May 2008 15:22:13 -0000
  • Message-id: <20080509152214.0FBB62DEAB@xxxxxxxxxxxxxxxx>
Author: michael_meeks
Date: Fri May 9 17:22:13 2008
New Revision: 47421

URL: http://svn.opensuse.org/viewcvs/yast?rev=47421&view=rev
Log:
yet more minimal test.

Modified:
trunk/gtk/tests/Wizard.ycp

Modified: trunk/gtk/tests/Wizard.ycp
URL:
http://svn.opensuse.org/viewcvs/yast/trunk/gtk/tests/Wizard.ycp?rev=47421&r1=47420&r2=47421&view=diff
==============================================================================
--- trunk/gtk/tests/Wizard.ycp (original)
+++ trunk/gtk/tests/Wizard.ycp Fri May 9 17:22:13 2008
@@ -51,51 +51,12 @@

UI::WizardCommand(`SetCurrentStep( "net" ) );

-
- term languagesel = `ComboBox (
- `id (`language), `opt (`notify, `hstretch),
- "&Language", [ "a", "b", "c" ]
- );
-
- term keyboardsel = `ComboBox (
- `id (`keyboard), `opt (`notify, `hstretch),
- "&Keyboard Layout", [ "a", "b", "c" ]
- );
-
- // this type of contents will be shown only for initial installation dialog
term contents = `VBox (
- `VWeight (3, `VStretch()),
- `HSquash (`VBox (
- `HBox (
- `HSpacing (2),
- `Left (languagesel)
- ),
- `VSpacing (1),
- `HBox (
- `HSpacing (2),
- `Left (keyboardsel)
- )
- )),
- `VWeight (1, `VStretch()),
- `HSquash (
- `VBox (
- `Left (`Label (`opt(`boldFont), "License Agreement")),
- `HSquash(`MinSize (
-// 80, 13,
- 80, 17,
- `Left (`ReplacePoint (`id (`base_license_rp), `Empty()))
- )),
- `VSpacing (0.5),
- `MinHeight (1, `HBox (
- `Left (`CheckBox (
- `id (`license_agreement), `opt (`notify), "I &Agree to
the License Terms.", true
- )),
- `VStretch (),
- `Right (`PushButton (`id (`show_fulscreen_license), "&Show
License..."))
- ))
- )
- ),
- `VWeight (3, `VStretch())
+ `MinSize (
+ 80, 20, // tweak me ! :-)
+ `ReplacePoint (`id (`base_license_rp), `Empty())
+ ),
+ `PushButton (`id (`show_fulscreen_license), "&Show License...")
);

{

--
To unsubscribe, e-mail: yast-commit+unsubscribe@xxxxxxxxxxxx
For additional commands, e-mail: yast-commit+help@xxxxxxxxxxxx

< Previous Next >
This Thread
  • No further messages