diff options
-rw-r--r-- | USER/USER.xs | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/USER/USER.xs b/USER/USER.xs index d0bc77c..df8e796 100644 --- a/USER/USER.xs +++ b/USER/USER.xs @@ -1,4 +1,4 @@ -/* Copyright (C) 2003 MandrakeSoft SA Daouda Lo (daouda at mandrakesoft at com) +/* Copyright (C) 2003 MandrakeSoft SA Daouda Lo (daouda at mandrakesoft dot com) * This program is free software; you can redistribute it and/or * modify it under the same terms as Perl itself. */ @@ -41,9 +41,10 @@ convert_value_array_list(register SV **sp, GValueArray *array) { } return sp; } -void -convert_to_value( SV *item, GValue *value) { - + +static char * +get_string(USER__ENT *ent, ) { + char } MODULE = USER PACKAGE = USER::ADMIN PREFIX = Admin_ @@ -60,6 +61,13 @@ Admin_new(CLASS) OUTPUT: RETVAL +void +Admin_start(self) + USER::ADMIN self + CODE: + USER__ERR error; + self = lu_start(NULL, 0, NULL, NULL, NULL, NULL, &error); + void Admin_DESTROY(self) USER::ADMIN self |