summaryrefslogtreecommitdiffstats
path: root/perl-install/Newt
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2003-02-18 19:59:44 +0000
committerPascal Rigaux <pixel@mandriva.com>2003-02-18 19:59:44 +0000
commit2b8ed29ac81065d904984b57963b0bf9eddb9177 (patch)
tree21ad8c280393ba219148a999a9676e0bfb47aa93 /perl-install/Newt
parent95c8d3e58a9b70e4e6e4afe43cc1e609c44da529 (diff)
downloaddrakx-backup-do-not-use-2b8ed29ac81065d904984b57963b0bf9eddb9177.tar
drakx-backup-do-not-use-2b8ed29ac81065d904984b57963b0bf9eddb9177.tar.gz
drakx-backup-do-not-use-2b8ed29ac81065d904984b57963b0bf9eddb9177.tar.bz2
drakx-backup-do-not-use-2b8ed29ac81065d904984b57963b0bf9eddb9177.tar.xz
drakx-backup-do-not-use-2b8ed29ac81065d904984b57963b0bf9eddb9177.zip
fix tree in newt (now handles default selected entry, and disallow using non-leaves)
Diffstat (limited to 'perl-install/Newt')
-rw-r--r--perl-install/Newt/Newt.xs14
1 files changed, 7 insertions, 7 deletions
diff --git a/perl-install/Newt/Newt.xs b/perl-install/Newt/Newt.xs
index 22a6a79ae..46da0b5fd 100644
--- a/perl-install/Newt/Newt.xs
+++ b/perl-install/Newt/Newt.xs
@@ -232,7 +232,7 @@ int
newtTreeAdd(co,text,data,parents)
Newt::Component co;
const char * text;
- SV * data;
+ int data;
SV * parents;
CODE:
{
@@ -242,7 +242,7 @@ newtTreeAdd(co,text,data,parents)
for (i = 0; i <= av_len(av); i++) l[i] = SvIV(*av_fetch(av, i, 0));
l[i++] = NEWT_ARG_APPEND;
l[i] = NEWT_ARG_LAST;
- RETVAL = newtCheckboxTreeAddArray(co, text, SvREFCNT_inc(data), 0, l);
+ RETVAL = newtCheckboxTreeAddArray(co, text, (void *) data, 0, l);
}
OUTPUT:
RETVAL
@@ -250,9 +250,9 @@ newtTreeAdd(co,text,data,parents)
void
newtTreeSetCurrent(co, data)
Newt::Component co;
- SV * data;
+ int data;
CODE:
- newtCheckboxTreeSetCurrent(co, data);
+ newtCheckboxTreeSetCurrent(co, (void *) data);
void
newtTreeSetWidth(co,width)
@@ -261,11 +261,11 @@ newtTreeSetWidth(co,width)
CODE:
newtCheckboxTreeSetWidth(co, width);
-SV *
+int
newtTreeGetCurrent(co)
Newt::Component co;
CODE:
- RETVAL = SvREFCNT_inc(newtCheckboxTreeGetCurrent(co));
+ RETVAL = (int) newtCheckboxTreeGetCurrent(co);
OUTPUT:
RETVAL
@@ -308,7 +308,7 @@ newtReflowText(text,width,flexDown,flexUp,actualWidth,actualHeight)
Newt::Component
newtForm(vertBar,help,flags)
Newt::Component vertBar;
- const char * help;
+ char * help;
int flags;
void