From 9fe92c372556a4b0ddde91d2b8ad606696250f09 Mon Sep 17 00:00:00 2001
From: darthgandalf <darthgandalf@726aef4b-f618-498e-8847-2d620e286838>
Date: Mon, 27 Sep 2010 13:08:07 +0000
Subject: [PATCH] Fix modperl. It didn't work.

git-svn-id: https://znc.svn.sourceforge.net/svnroot/znc/trunk@2143 726aef4b-f618-498e-8847-2d620e286838
---
 modules/modperl/startup.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/modules/modperl/startup.pl b/modules/modperl/startup.pl
index f4bf8fd9..5e928720 100644
--- a/modules/modperl/startup.pl
+++ b/modules/modperl/startup.pl
@@ -112,7 +112,7 @@ sub GetModInfo {
 	return ($ZNC::Perl_LoadError, "Incorrect perl module.") unless IsModule $modpath, $modname;
 	require $modpath;
     my $pmod = bless {}, $modname;
-    return ($ZNC::Perl_Loaded, $modpath->GetPerlStr, $pmod->description)
+    return ($ZNC::Perl_Loaded, $modpath, $pmod->description)
 }
 
 sub ModInfoByPath {