From 68d3ba501ed4219f9b173a4c9e373c024180d087 Mon Sep 17 00:00:00 2001
From: Vadim Konovalov <vkonovalov@lucent.com>
Date: Thu, 2 Nov 2006 13:36:49 +0100
Subject: [patch at 21983] factor out $^O eq 'darwin' from XSLoader.pm From:
 "Konovalov, Vadim Vladimirovich (Vadim)** CTR **" <vkonovalov@Lucent.com>
 Message-ID:
 <E3FB32585BF1D411B9E900805FF51A080204E833@ru0022exch001u.ru.lucent.com>

p4raw-id: //depot/perl@29188
---
 ext/DynaLoader/XSLoader_pm.PL | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/ext/DynaLoader/XSLoader_pm.PL b/ext/DynaLoader/XSLoader_pm.PL
index d95cdb05cd..2f8b3e893e 100644
--- a/ext/DynaLoader/XSLoader_pm.PL
+++ b/ext/DynaLoader/XSLoader_pm.PL
@@ -82,12 +82,17 @@ print OUT <<'EOT';
 
     my $boot_symbol_ref;
 
+EOT
+
     if ($^O eq 'darwin') {
+print OUT <<'EOT';
         if ($boot_symbol_ref = dl_find_symbol(0, $bootname)) {
             goto boot; #extension library has already been loaded, e.g. darwin
         }
+EOT
     }
 
+print OUT <<'EOT';
     # Many dynamic extension loading problems will appear to come from
     # this section of code: XYZ failed at line 123 of DynaLoader.pm.
     # Often these errors are actually occurring in the initialisation
-- 
cgit v1.2.1