diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2008-09-14 15:23:12 +0200 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2008-09-15 17:40:20 +0200 |
commit | e7d49794942e68443518ab83a372857ebd4001c6 (patch) | |
tree | 4fc2599c9c72a8ea8121edd7d122cec1940808cd /source4/pidl/lib/Parse/Pidl/Samba4/Header.pm | |
parent | 54437f1e8a9274cb7afa3b850d709568414dff71 (diff) | |
download | samba-e7d49794942e68443518ab83a372857ebd4001c6.tar.gz samba-e7d49794942e68443518ab83a372857ebd4001c6.tar.bz2 samba-e7d49794942e68443518ab83a372857ebd4001c6.zip |
Fix imports.
Diffstat (limited to 'source4/pidl/lib/Parse/Pidl/Samba4/Header.pm')
-rw-r--r-- | source4/pidl/lib/Parse/Pidl/Samba4/Header.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm b/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm index 2e77ff01b8..611f0adb92 100644 --- a/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm +++ b/source4/pidl/lib/Parse/Pidl/Samba4/Header.pm @@ -334,10 +334,10 @@ sub HeaderFunction($) sub HeaderImport { my @imports = @_; - foreach (@imports) { - s/\.idl\"$//; - s/^\"//; - pidl choose_header("librpc/gen_ndr/$_\.h", "gen_ndr/$_.h") . "\n"; + foreach my $import (@imports) { + $import = unmake_str($import); + $import =~ s/\.idl$//; + pidl choose_header("librpc/gen_ndr/$import\.h", "gen_ndr/$import.h") . "\n"; } } |