From 3ef968b17e5e4b75123e40a775ce00590a659d3d Mon Sep 17 00:00:00 2001 From: prozacx Date: Tue, 27 Dec 2005 18:37:48 +0000 Subject: [PATCH] Changed DataPath to SavePath git-svn-id: https://znc.svn.sourceforge.net/svnroot/znc/trunk@587 726aef4b-f618-498e-8847-2d620e286838 --- modules/modperl.cpp | 2 +- modules/modperl.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/modules/modperl.cpp b/modules/modperl.cpp index 5415ff95..c0f8f37d 100644 --- a/modules/modperl.cpp +++ b/modules/modperl.cpp @@ -692,7 +692,7 @@ XS(XS_ZNC_GetString) else if ( sName == "DLPath" ) sReturn = pUser->GetDLPath(); else if ( sName == "ModPath" ) sReturn = CZNC::Get().GetModPath(); else if ( sName == "HomePath" ) sReturn = CZNC::Get().GetHomePath(); - //else if ( sName == "DataPath" ) sReturn = pUser->GetDataPath(); + else if ( sName == "SavePath" ) sReturn = g_ModPerl->GetSavePath(); else if ( sName == "StatusPrefix" ) sReturn = pUser->GetStatusPrefix(); else if ( sName == "DefaultChanModes" ) sReturn = pUser->GetDefaultChanModes(); else if ( sName == "IRCServer" ) sReturn = pUser->GetIRCServer(); diff --git a/modules/modperl.pm b/modules/modperl.pm index 26a5bb39..725ec428 100644 --- a/modules/modperl.pm +++ b/modules/modperl.pm @@ -59,7 +59,7 @@ sub CORELoadMod return( HALTMODS() ); } - my $DPath = GetString( "DataPath" ); + my $DPath = GetString( "SavePath" ); my $FileName = $DPath . "/." . $Username . $Module . ".pm"; if ( !open( INMOD, $ModPath ) )