[interchange-cvs] [SCM] Interchange branch, STABLE_5_4-branch, updated. 26b64c2e51c964e47e8a8f0bc34c3ce7e37ba7b8

[Jon Jensen]

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Interchange".

The branch, STABLE_5_4-branch has been updated
       via  26b64c2e51c964e47e8a8f0bc34c3ce7e37ba7b8 (commit)
       via  e08436ee5c49b51d9ffa2d31f65cacb764612dfc (commit)
      from  3dfeb51971edb3b0b86f67bb48b12271b24517fd (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 26b64c2e51c964e47e8a8f0bc34c3ce7e37ba7b8
Author: Jon Jensen <jon at endpoint.com>
Date:   Sat Jun 27 11:53:41 2009 +0200

    Add .gitignore from master branch

commit e08436ee5c49b51d9ffa2d31f65cacb764612dfc
Author: Stefan Hornburg (Racke) <racke at linuxia.de>
Date:   Sat Jun 27 11:30:34 2009 +0200

    Correct detection of broken getppid() for Perl 5.10.0 (RT #286)

-----------------------------------------------------------------------

Summary of changes and diff:
 .gitignore   |   62 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 WHATSNEW-5.4 |   16 +++++++++++++++
 hints.pl     |   12 ++++++----
 3 files changed, 85 insertions(+), 5 deletions(-)
 create mode 100644 .gitignore

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..6d95a2f
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,62 @@
+*.pdf
+*.tar.gz
+.cpan.tried
+META.yml
+Makefile
+Makefile.old
+MANIFEST.bak
+_allow_threads
+_session_storable
+_uid
+blib
+blib/lib/Business
+blib/lib/File
+blib/lib/HTML
+blib/lib/IniConf.pm
+blib/lib/Tie
+build
+build-stamp
+debian/*.debhelper
+debian/*.substvars
+debian/files
+debian/interchange
+debian/interchange-cat-foundation
+debian/interchange-doc
+debian/interchange-ui
+debian/substvars
+debian/tmp
+dist/test/*.structure
+dist/test/error.log
+dist/test/products/*.autonumber
+dist/test/products/*.gdbm
+dist/test/products/*.sql
+dist/test/products/composite.asc.*
+dist/test/products/site.txt
+dist/test/session
+dist/test/tmp
+install-stamp
+lib/Business
+lib/File
+lib/HTML
+lib/IniConf.pm
+lib/Tie
+pm_to_blib
+scripts/chkcat
+scripts/compile_link
+scripts/config_prog
+scripts/configdump
+scripts/crontab
+scripts/dump
+scripts/expire
+scripts/expireall
+scripts/findtags
+scripts/ic_mod_perl
+scripts/initp.pl
+scripts/interchange
+scripts/localize
+scripts/makecat
+scripts/minivend
+scripts/newcat
+scripts/offline
+scripts/restart
+scripts/update
diff --git a/WHATSNEW-5.4 b/WHATSNEW-5.4
index fcd8ec1..744e814 100644
--- a/WHATSNEW-5.4
+++ b/WHATSNEW-5.4
@@ -6,6 +6,22 @@
 ------------------------------------------------------------------------------
 
 
+Interchange 5.4.4 not yet released.
+
+Core
+----
+
+* Update broken getppid() detection for Perl 5.10.0.
+
+Standard demo
+-------------
+
+* Fix cross site scripting error found by Josh Lavin of Perusion.
+
+
+------------------------------------------------------------------------------
+
+
 Interchange 5.4.3 released on 2008-11-13.
 
 
diff --git a/hints.pl b/hints.pl
index 405cb49..b238c98 100644
--- a/hints.pl
+++ b/hints.pl
@@ -43,16 +43,18 @@ sub get_hints {
 		while(<HINTIN>) {
 			print HINTOUT $_;
 		}
-		print HINTOUT <<EOF;
+		if ($^V lt 5.10.0) {
+			print HINTOUT <<EOF;
 
 ## Added because threaded Perl on linux has broken getppid() as
 ## of this distribution
 Variable MV_GETPPID_BROKEN 1
 EOF
-		close HINTIN;
-		close HINTOUT;
-		unlink "$fn.bak";
-		return 1;
+			close HINTIN;
+			close HINTOUT;
+			unlink "$fn.bak";
+			return 1;
+		}
 	};
 	push @out, [ $condition, $routine ];
 


hooks/post-receive
-- 
Interchange