From f451bb2bd0f1ce0714478448e8a550e4abdd8859 Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Sun, 26 Feb 2012 18:17:23 +0100
Subject: [PATCH] Use XML::SAX::PurePerl instead of XML::SAX::ExpatXS for now

---
 lib/Slic3r/Format/AMF.pm        | 4 ++--
 lib/Slic3r/Format/AMF/Parser.pm | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/Slic3r/Format/AMF.pm b/lib/Slic3r/Format/AMF.pm
index 5d174230b..901cb4544 100644
--- a/lib/Slic3r/Format/AMF.pm
+++ b/lib/Slic3r/Format/AMF.pm
@@ -9,14 +9,14 @@ sub read_file {
     my ($file) = @_;
     
     eval "require Slic3r::Format::AMF::Parser; 1"
-        or die "AMF parsing requires XML::SAX::ExpatXS\n";
+        or die "AMF parsing requires XML::SAX\n";
     
     open my $fh, '<', $file or die "Failed to open $file\n";
     
     my $vertices = [];
     my $materials = {};
     my $meshes_by_material = {};
-    XML::SAX::ExpatXS
+    XML::SAX::PurePerl
         ->new(Handler => Slic3r::Format::AMF::Parser->new(
             _vertices           => $vertices,
             _materials          => $materials,
diff --git a/lib/Slic3r/Format/AMF/Parser.pm b/lib/Slic3r/Format/AMF/Parser.pm
index b6c7dbefc..4d9394973 100644
--- a/lib/Slic3r/Format/AMF/Parser.pm
+++ b/lib/Slic3r/Format/AMF/Parser.pm
@@ -2,7 +2,7 @@ package Slic3r::Format::AMF::Parser;
 use strict;
 use warnings;
 
-use XML::SAX::ExpatXS;
+use XML::SAX::PurePerl;
 use XXX;
 
 use base 'XML::SAX::Base';