The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

$pkg is a wrapper around an instance of Mozilla's $iface interface. This class inherits from L\<$parentclass|$pkgbase\::$parentclass>.

$classcomment

$pret\$$obj\->$method-{name}>\($psig)

EOP

    print OUT <<EOM;
## $method->{orig}
$xsret
${prefix}$method->{name} \($xssig)
        $iface *$obj;
$xssigdecl$xspre$ccode
$xsout
EOM
}

print OUT <<POD; =head1 CLASS METHODS

\$iid = $pkg\->B\<GetIID>()

Pass this to QueryInterface.

METHODS

POD

foreach my $pod (@pod) { print OUT $pod; }

print OUT <<FOOT; =head1 SEE ALSO

Mozilla::DOM

COPYRIGHT

Copyright (C) 2005, Scott Lanning

This software is licensed under the LGPL. See Mozilla::DOM for a full notice.