[Devel] SF.net SVN: openser: [1692] trunk/modules/perl/perl.c

[bastian at users.sourceforge.net]

Revision: 1692
          http://openser.svn.sourceforge.net/openser/?rev=1692&view=rev
Author:   bastian
Date:     2007-02-26 00:40:49 -0800 (Mon, 26 Feb 2007)

Log Message:
-----------
Enforcing perl file initialization to enable global variables to be
initialized

Modified Paths:
--------------
    trunk/modules/perl/perl.c

Modified: trunk/modules/perl/perl.c
===================================================================
--- trunk/modules/perl/perl.c	2007-02-25 23:58:10 UTC (rev 1691)
+++ trunk/modules/perl/perl.c	2007-02-26 08:40:49 UTC (rev 1692)
@@ -228,6 +228,7 @@
 	}
 
 	if (modpathset) pkg_free(argv[modpathset]);
+	perl_run(new_perl);
 
 	return new_perl;
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.