Author: aschnell
Date: Thu Apr 3 21:17:05 2008
New Revision: 46067
URL: http://svn.opensuse.org/viewcvs/yast?rev=46067&view=rev
Log:
- use new toterm
Modified:
branches/tmp/aschnell/part-redesign/MAINTAINER
branches/tmp/aschnell/part-redesign/storage/src/modules/Greasemonkey.ycp
branches/tmp/aschnell/part-redesign/yast2-storage.spec.in
Modified: branches/tmp/aschnell/part-redesign/MAINTAINER
URL: http://svn.opensuse.org/viewcvs/yast/branches/tmp/aschnell/part-redesign/MAINTAINER?rev=46067&r1=46066&r2=46067&view=diff
==============================================================================
--- branches/tmp/aschnell/part-redesign/MAINTAINER (original)
+++ branches/tmp/aschnell/part-redesign/MAINTAINER Thu Apr 3 21:17:05 2008
@@ -1 +1 @@
-Thomas Fehr
+Arvin Schnell
Modified: branches/tmp/aschnell/part-redesign/storage/src/modules/Greasemonkey.ycp
URL: http://svn.opensuse.org/viewcvs/yast/branches/tmp/aschnell/part-redesign/storage/src/modules/Greasemonkey.ycp?rev=46067&r1=46066&r2=46067&view=diff
==============================================================================
--- branches/tmp/aschnell/part-redesign/storage/src/modules/Greasemonkey.ycp (original)
+++ branches/tmp/aschnell/part-redesign/storage/src/modules/Greasemonkey.ycp Thu Apr 3 21:17:05 2008
@@ -30,11 +30,7 @@
term LeftRadioButton(term old)
{
- // YCP has no function to construct a term from a symbol and list or args
-
- term t = `RadioButton();
- foreach(any arg, argsof(old), { t = add(t, arg); });
- return `Left(t);
+ return `Left(toterm(`RadioButton, argsof(old)));
}
@@ -52,15 +48,12 @@
{
list l = argsof(old);
- // YCP has no function to split a list!
-
- term t1 = `RadioButton();
- list t2 = remove(l, size(l)-1);
- foreach(any arg, t2, { t1 = add(t1, arg); });
-
- any content = l[size(l)-1]:nil;
+ // YCP has no function to slice a list
+ list tmp1 = remove(l, size(l)-1);
+ any tmp2 = l[size(l)-1]:nil;
- return `VBox(`Left(t1), `HBox(`HSpacing(4), content));
+ return `VBox(`Left(toterm(`RadioButton, tmp1)),
+ `HBox(`HSpacing(4), tmp2));
}
@@ -94,8 +87,7 @@
if (handler != nil)
return handler(old);
- // symbolof returns a symbol but toterm expects a string
- term new = toterm(substring(sformat ("%1", s), 1));
+ term new = toterm(s);
foreach(any arg, argsof(old), {
if (is(arg, term))
Modified: branches/tmp/aschnell/part-redesign/yast2-storage.spec.in
URL: http://svn.opensuse.org/viewcvs/yast/branches/tmp/aschnell/part-redesign/yast2-storage.spec.in?rev=46067&r1=46066&r2=46067&view=diff
==============================================================================
--- branches/tmp/aschnell/part-redesign/yast2-storage.spec.in (original)
+++ branches/tmp/aschnell/part-redesign/yast2-storage.spec.in Thu Apr 3 21:17:05 2008
@@ -7,7 +7,8 @@
# proc_meminfo.scr moved to yast2-2.15.23
# Installation::installedVersion and Installation::updateVersion
# AutionstData
-Requires: yast2 >= 2.16.8
+Requires: yast2-core >= 2.16.42
+Requires: yast2 >= 2.16.39
%ifarch s390 s390x
Requires: yast2-s390
%endif
--
To unsubscribe, e-mail: yast-commit+unsubscribe@opensuse.org
For additional commands, e-mail: yast-commit+help@opensuse.org