Репозиторий ALT Linux backports/2.4
Последнее обновление: 9 июля 2008 | Пакетов: 497 | Посещений: 1587469
 поиск   регистрация   авторизация 
 
Группа :: Разработка/Perl
Пакет: perl-HTML-Parser

 Главная   Изменения   Спек   Патчи   Загрузить   Bugs and FR 

Патч: perl-HTML-Parser-3.45-alt-XSLoader.patch


--- HTML-Parser-3.45/Parser.pm-	2005-01-06 12:02:27 +0300
+++ HTML-Parser-3.45/Parser.pm	2005-06-25 12:34:52 +0400
@@ -13,9 +13,15 @@
 
 require HTML::Entities;
 
-require DynaLoader;
-@ISA=qw(DynaLoader);
-HTML::Parser->bootstrap($VERSION);
+eval {
+    require XSLoader;
+    XSLoader::load('HTML::Parser', $VERSION);
+    1;
+} or do {
+    require DynaLoader;
+    local @ISA=qw(DynaLoader);
+    HTML::Parser->bootstrap($VERSION);
+};
 
 
 sub new
 
design & coding: Vladimir Lettiev aka crux © 2004-2005