Fix imports in Python.
authorJelmer Vernooij <jelmer@samba.org>
Sun, 14 Sep 2008 14:39:41 +0000 (16:39 +0200)
committerJelmer Vernooij <jelmer@samba.org>
Mon, 15 Sep 2008 15:40:23 +0000 (17:40 +0200)
source4/pidl/lib/Parse/Pidl/Samba4/Python.pm

index 3b7e875260f1edef9c81275b43c7e947b771f68f..74cec5a8274c3427371f61f29d3777fa1e354770 100644 (file)
@@ -11,7 +11,7 @@ use Exporter;
 use strict;
 use Parse::Pidl qw(warning fatal);
 use Parse::Pidl::Typelist qw(hasType resolveType getType mapTypeName expandAlias);
-use Parse::Pidl::Util qw(has_property ParseExpr);
+use Parse::Pidl::Util qw(has_property ParseExpr unmake_str);
 use Parse::Pidl::NDR qw(GetPrevLevel GetNextLevel ContainsDeferred is_charset_array);
 use Parse::Pidl::CUtil qw(get_value_of get_pointer_to);
 use Parse::Pidl::Samba4::Header qw(GenerateFunctionInEnv GenerateFunctionOutEnv EnvSubstituteValue GenerateStructEnv);
@@ -60,8 +60,8 @@ sub Import
        my $self = shift;
        my @imports = @_;
        foreach (@imports) {
-               s/\.idl\"$//;
-               s/^\"//;
+               $_ = unmake_str($_);
+               s/\.idl$//;
                $self->pidl_hdr("#include \"librpc/gen_ndr/py_$_\.h\"\n");
        }
 }