projects
/
idzebra-moved-to-github.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Added framework for the pos calls. rsisamb and rsnull have a real one,
[idzebra-moved-to-github.git]
/
perl
/
zebra_perl.c
diff --git
a/perl/zebra_perl.c
b/perl/zebra_perl.c
index
3024d4b
..
3143415
100644
(file)
--- a/
perl/zebra_perl.c
+++ b/
perl/zebra_perl.c
@@
-64,7
+64,7
@@
void record_retrieve(RetrievalObj *ro,
res->errString = "";
}
res->position = ro->records[i].position;
res->errString = "";
}
res->position = ro->records[i].position;
- res->base = ro->records[i].base;
+ res->base = odr_strdup(stream, ro->records[i].base);
res->format = (char *)
yaz_z3950_oid_value_to_str(ro->records[i].format, CLASS_RECSYN);
res->buf = buf;
res->format = (char *)
yaz_z3950_oid_value_to_str(ro->records[i].format, CLASS_RECSYN);
res->buf = buf;