← Back to branch summary

~ubuntu-branches/ubuntu/lucid/libxml-libxml-perl/lucid

« back to all changes in this revision

Viewing changes to lib/XML/LibXML/SAX/Builder.pm

  • Committer: Bazaar Package Importer
  • Author(s): gregor herrmann
  • Date: 2009-05-31 14:36:13 UTC
  • mfrom: (4.1.7 jaunty)
  • Revision ID: james.westby@ubuntu.com-20090531143613-xxpnwmrz62kwtejq
Tags: 1.69.ds-2
http://bugs.debian.org/523275
* Remove Florian Ragwitz from Uploaders (closes: #523275).
* Set Standards-Version to 3.8.1 (no changes).
* Remove duplicate fields from debian/control.
* Minimize debian/rules, bump quilt and debhelper build dependencies.

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/XML/LibXML/SAX/Builder.pm
1
 
# $Id: Builder.pm 709 2008-01-29 21:01:32Z pajas $
 
1
# $Id: Builder.pm 760 2008-11-11 19:30:27Z pajas $
2
2
 
3
3
package XML::LibXML::SAX::Builder;
4
4
 
7
7
 
8
8
use vars qw ($VERSION);
9
9
 
10
 
$VERSION = "1.66"; # VERSION TEMPLATE: DO NOT CHANGE
 
10
sub CLONE_SKIP {
 
11
  return $XML::LibXML::__threads_shared ? 0 : 1;
 
12
}
 
13
 
 
14
$VERSION = "1.69"; # VERSION TEMPLATE: DO NOT CHANGE
11
15
 
12
16
sub new {
13
17
    my $class = shift;
36
40
sub start_dtd {
37
41
  my ($self, $dtd) = @_;
38
42
  if (defined $dtd->{Name} and
39
 
      (defined $dtd->{SystemID} or defined $dtd->{PublicID})) {
40
 
    $self->{DOM}->createExternalSubset($dtd->{Name},$dtd->{PublicID},$dtd->{SystemID});
 
43
      (defined $dtd->{SystemId} or defined $dtd->{PublicId})) {
 
44
    $self->{DOM}->createExternalSubset($dtd->{Name},$dtd->{PublicId},$dtd->{SystemId});
41
45
  }
42
46
}
43
47
 
46
50
 
47
51
sub start_document {
48
52
    my ($self, $doc) = @_;
49
 
 
50
53
    $self->{DOM} = XML::LibXML::Document->createDocument();
51
54
 
52
55
    if ( defined $self->{Encoding} ) {