diff options
| author | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2007-07-20 08:25:30 +0000 |
|---|---|---|
| committer | nanardon <nanardon@971eb68f-4bfb-0310-8326-d2484c010a4c> | 2007-07-20 08:25:30 +0000 |
| commit | 72114e413e229865957b738e05872ca59dabc6ac (patch) | |
| tree | 1822016d220aabe03f98a6498c72d7955e4f9cc4 /RPM4/src/RPM4.xs | |
| parent | 21497f8d0da9b9884ed879907cf223c401008393 (diff) | |
| download | perl-RPM4-72114e413e229865957b738e05872ca59dabc6ac.tar perl-RPM4-72114e413e229865957b738e05872ca59dabc6ac.tar.gz perl-RPM4-72114e413e229865957b738e05872ca59dabc6ac.tar.bz2 perl-RPM4-72114e413e229865957b738e05872ca59dabc6ac.tar.xz perl-RPM4-72114e413e229865957b738e05872ca59dabc6ac.zip | |
- fix header->string
git-svn-id: svn+ssh://haiku.zarb.org/home/projects/rpm4/svn/trunk@134 971eb68f-4bfb-0310-8326-d2484c010a4c
Diffstat (limited to 'RPM4/src/RPM4.xs')
| -rw-r--r-- | RPM4/src/RPM4.xs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/RPM4/src/RPM4.xs b/RPM4/src/RPM4.xs index 8fa3bff..064d5da 100644 --- a/RPM4/src/RPM4.xs +++ b/RPM4/src/RPM4.xs @@ -998,10 +998,10 @@ Header_string(h, no_header_magic = 0) void * ptr = NULL; int hsize = 0; PPCODE: + hsize = headerSizeof(h, no_header_magic ? HEADER_MAGIC_NO : HEADER_MAGIC_YES); string = headerUnload(h); - hsize = headerSizeof((Header) string, no_header_magic ? HEADER_MAGIC_NO : HEADER_MAGIC_YES); ptr = string + (no_header_magic ? offset : 0); - PUSHs(sv_2mortal(newSVpv((char *)ptr, hsize))); + XPUSHs(sv_2mortal(newSVpv((char *)ptr, hsize))); free(string); int |