summaryrefslogtreecommitdiffstats
path: root/bindings/perl
diff options
context:
space:
mode:
authorBenjamin Dauvergne <bdauvergne@entrouvert.com>2010-09-01 12:41:28 +0200
committerBenjamin Dauvergne <bdauvergne@entrouvert.com>2010-09-03 19:02:37 +0200
commit35ff3d6950e6428c3a6c3d7b275313db2412aafa (patch)
treebb6659da78f8020d09be8d849cfb1baa0416634a /bindings/perl
parent8ebeeb9a361d6bb9f7f74039eef9feb320feeb17 (diff)
downloadlasso-35ff3d6950e6428c3a6c3d7b275313db2412aafa.tar.gz
lasso-35ff3d6950e6428c3a6c3d7b275313db2412aafa.tar.xz
lasso-35ff3d6950e6428c3a6c3d7b275313db2412aafa.zip
[Strings] add string constant for the internal XML attributes used in dumps
Add string constants for signature method, signature type, private key (file path or content), private key password and certificate (file path or content). Add cast for xmlChar constant strings definition in python bindings, it assumed all constant strings were char*.
Diffstat (limited to 'bindings/perl')
-rw-r--r--bindings/perl/lang.py2
1 files changed, 1 insertions, 1 deletions
diff --git a/bindings/perl/lang.py b/bindings/perl/lang.py
index 0d3e4f8b..7390ecb4 100644
--- a/bindings/perl/lang.py
+++ b/bindings/perl/lang.py
@@ -223,7 +223,7 @@ INCLUDE: LassoNode.xs
if type == 'i':
self.xs.pn('ct = newSViv(%s);' % name)
elif type == 's':
- self.xs.pn('ct = newSVpv(%s, 0);' % name)
+ self.xs.pn('ct = newSVpv((char*)%s, 0);' % name)
elif type == 'b': # only one case LASSO_WSF_ENABLED
self.xs.unindent()
self.xs.pn('''#ifdef %s