diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2006-09-13 16:29:14 +0000 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2006-09-13 16:29:14 +0000 |
commit | 68f0773e3a1b1eb06e16bd786c3b846cc92e9128 (patch) | |
tree | 24de3f4d4a4134b529a28fc83864ca4e3e36121d | |
parent | 62fe3d3f94fb1751d277f95834607a68a4a5e71e (diff) | |
download | samba-68f0773e3a1b1eb06e16bd786c3b846cc92e9128.tar.gz samba-68f0773e3a1b1eb06e16bd786c3b846cc92e9128.tar.xz samba-68f0773e3a1b1eb06e16bd786c3b846cc92e9128.zip |
r18482: Fix a couple of small issues in the generated server code.
-rw-r--r-- | source/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/source/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm b/source/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm index 47e18fee69f..9ecd7d1e838 100644 --- a/source/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm +++ b/source/pidl/lib/Parse/Pidl/Samba3/ServerNDR.pm @@ -60,10 +60,10 @@ sub ParseFunction($$) my $ret = "_$fn->{NAME}(p"; foreach (@{$fn->{ELEMENTS}}) { my @dir = @{$_->{DIRECTION}}; - if (grep(@dir, /in/) and grep(@dir, /out/)) { + if (grep(/in/, @dir) and grep(/out/, @dir)) { pidl "r.out.$_->{NAME} = r.in.$_->{NAME};"; } - if (grep(@dir, /in/)) { $ret .= ", r.in.$_->{NAME}"; } + if (grep(/in/, @dir)) { $ret .= ", r.in.$_->{NAME}"; } else { $ret .= ", r.out.$_->{NAME}"; } $proto .= ", " . DeclLong($_); @@ -95,7 +95,7 @@ sub ParseFunction($$) pidl "}"; pidl ""; pidl "blob = ndr_push_blob(push);"; - pidl "if (!prs_init_data_blob(&p->in_data.rdata, &blob, p->mem_ctx)) {"; + pidl "if (!prs_init_data_blob(&p->out_data.rdata, &blob, p->mem_ctx)) {"; pidl "\ttalloc_free(mem_ctx);"; pidl "\treturn False;"; pidl "}"; |