From 32cdb1cf47b9cf30be3e69238d3665f1d9df8afc Mon Sep 17 00:00:00 2001
From: "jake%bugzilla.org" <jake%bugzilla.org>
Date: Wed, 2 Apr 2003 00:40:56 +0000
Subject: [PATCH] Bug 171674 - Adding a section to the Troubleshooting section
 describing how to fix the File::Temp problems in perl 5.6.0.

---
 webtools/bugzilla/docs/sgml/filetemp.patch    | 18 ++++++
 webtools/bugzilla/docs/sgml/installation.sgml | 56 +++++++++++++++++++
 webtools/bugzilla/docs/xml/filetemp.patch     | 18 ++++++
 webtools/bugzilla/docs/xml/installation.xml   | 56 +++++++++++++++++++
 4 files changed, 148 insertions(+)
 create mode 100644 webtools/bugzilla/docs/sgml/filetemp.patch
 create mode 100644 webtools/bugzilla/docs/xml/filetemp.patch

diff --git a/webtools/bugzilla/docs/sgml/filetemp.patch b/webtools/bugzilla/docs/sgml/filetemp.patch
new file mode 100644
index 000000000000..9fb70adcea26
--- /dev/null
+++ b/webtools/bugzilla/docs/sgml/filetemp.patch
@@ -0,0 +1,18 @@
+--- File/Temp.pm.orig   Thu Feb  6 16:26:00 2003
++++ File/Temp.pm        Thu Feb  6 16:26:23 2003
+@@ -205,6 +205,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
+@@ -226,6 +227,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
diff --git a/webtools/bugzilla/docs/sgml/installation.sgml b/webtools/bugzilla/docs/sgml/installation.sgml
index 9f94feb7a9d0..68a911b86af4 100644
--- a/webtools/bugzilla/docs/sgml/installation.sgml
+++ b/webtools/bugzilla/docs/sgml/installation.sgml
@@ -1565,6 +1565,62 @@ proc filter_deny { why } {
       as root to fix this problem.
       </para>
     </section>    
+
+    <section id="trouble-filetemp">
+      <title>Your vendor has not defined Fcntl macro O_NOINHERIT</title>
+
+      <para>This is caused by a bug in the version of
+      <productname>File::Temp</productname> that is distributed with perl
+      5.6.0. Many minor variations of this error have been reported. Examples
+      can be found in <xref linkend="trouble-filetemp-errors"/>.
+      </para>
+
+      <figure id="trouble-filetemp-errors">
+        <title>Other File::Temp error messages</title>
+
+        <programlisting>
+Your vendor has not defined Fcntl macro O_NOINHERIT, used 
+at /usr/lib/perl5/site_perl/5.6.0/File/Temp.pm line 208.
+
+Your vendor has not defined Fcntl macro O_EXLOCK, used 
+at /usr/lib/perl5/site_perl/5.6.0/File/Temp.pm line 210.
+
+Your vendor has not defined Fcntl macro O_TEMPORARY, used 
+at /usr/lib/perl5/site_perl/5.6.0/File/Temp.pm line 233.
+        </programlisting>
+      </figure>
+
+      <para>Numerous people have reported that upgrading to version 5.6.1
+      or higher solved the problem for them. A less involved fix is to apply
+      the patch in <xref linkend="trouble-filetemp-patch"/>. The patch is also
+      available as a <ulink url="../sgml/filetemp.patch">patch file</ulink>.
+      </para>
+
+      <figure id="trouble-filetemp-patch">
+        <title>Patch for File::Temp in Perl 5.6.0</title>
+
+        <programlisting><![CDATA[
+--- File/Temp.pm.orig   Thu Feb  6 16:26:00 2003
++++ File/Temp.pm        Thu Feb  6 16:26:23 2003
+@@ -205,6 +205,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
+@@ -226,6 +227,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
+        ]]></programlisting>
+      </figure>
+    </section>
   </section>
 </chapter>
 
diff --git a/webtools/bugzilla/docs/xml/filetemp.patch b/webtools/bugzilla/docs/xml/filetemp.patch
new file mode 100644
index 000000000000..9fb70adcea26
--- /dev/null
+++ b/webtools/bugzilla/docs/xml/filetemp.patch
@@ -0,0 +1,18 @@
+--- File/Temp.pm.orig   Thu Feb  6 16:26:00 2003
++++ File/Temp.pm        Thu Feb  6 16:26:23 2003
+@@ -205,6 +205,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
+@@ -226,6 +227,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
diff --git a/webtools/bugzilla/docs/xml/installation.xml b/webtools/bugzilla/docs/xml/installation.xml
index 9f94feb7a9d0..68a911b86af4 100644
--- a/webtools/bugzilla/docs/xml/installation.xml
+++ b/webtools/bugzilla/docs/xml/installation.xml
@@ -1565,6 +1565,62 @@ proc filter_deny { why } {
       as root to fix this problem.
       </para>
     </section>    
+
+    <section id="trouble-filetemp">
+      <title>Your vendor has not defined Fcntl macro O_NOINHERIT</title>
+
+      <para>This is caused by a bug in the version of
+      <productname>File::Temp</productname> that is distributed with perl
+      5.6.0. Many minor variations of this error have been reported. Examples
+      can be found in <xref linkend="trouble-filetemp-errors"/>.
+      </para>
+
+      <figure id="trouble-filetemp-errors">
+        <title>Other File::Temp error messages</title>
+
+        <programlisting>
+Your vendor has not defined Fcntl macro O_NOINHERIT, used 
+at /usr/lib/perl5/site_perl/5.6.0/File/Temp.pm line 208.
+
+Your vendor has not defined Fcntl macro O_EXLOCK, used 
+at /usr/lib/perl5/site_perl/5.6.0/File/Temp.pm line 210.
+
+Your vendor has not defined Fcntl macro O_TEMPORARY, used 
+at /usr/lib/perl5/site_perl/5.6.0/File/Temp.pm line 233.
+        </programlisting>
+      </figure>
+
+      <para>Numerous people have reported that upgrading to version 5.6.1
+      or higher solved the problem for them. A less involved fix is to apply
+      the patch in <xref linkend="trouble-filetemp-patch"/>. The patch is also
+      available as a <ulink url="../sgml/filetemp.patch">patch file</ulink>.
+      </para>
+
+      <figure id="trouble-filetemp-patch">
+        <title>Patch for File::Temp in Perl 5.6.0</title>
+
+        <programlisting><![CDATA[
+--- File/Temp.pm.orig   Thu Feb  6 16:26:00 2003
++++ File/Temp.pm        Thu Feb  6 16:26:23 2003
+@@ -205,6 +205,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
+@@ -226,6 +227,7 @@
+     # eg CGI::Carp
+     local $SIG{__DIE__} = sub {};
+     local $SIG{__WARN__} = sub {};
++    local *CORE::GLOBAL::die = sub {};
+     $bit = &$func();
+     1;
+   };
+        ]]></programlisting>
+      </figure>
+    </section>
   </section>
 </chapter>