diff --git a/zone/groups.h b/zone/groups.h
index 909a9dd53..71935bf81 100644
--- a/zone/groups.h
+++ b/zone/groups.h
@@ -72,8 +72,8 @@ public:
 	uint32	GetTotalGroupDamage(Mob* other);
 	void	SplitMoney(uint32 copper, uint32 silver, uint32 gold, uint32 platinum, Client *splitter = nullptr);
 	inline	void SetLeader(Mob* newleader){ leader=newleader; };
-	inline	Mob* GetLeader(){ return leader; };
-	char*	GetLeaderName() { return membername[0]; };
+	inline	Mob* GetLeader() { return leader; };
+	const char*	GetLeaderName() { return leader->GetName(); };
 	void	SendHPPacketsTo(Mob* newmember);
 	void	SendHPPacketsFrom(Mob* newmember);
 	bool	UpdatePlayer(Mob* update);
diff --git a/zone/perl_groups.cpp b/zone/perl_groups.cpp
index 6960d14df..cdbffdd1c 100644
--- a/zone/perl_groups.cpp
+++ b/zone/perl_groups.cpp
@@ -342,8 +342,8 @@ XS(XS_Group_GetLeaderName)
 	if (items != 1)
 		Perl_croak(aTHX_ "Usage: Group::GetLeaderName(THIS)");
 	{
-		Group *		THIS;
-		char *		RETVAL;
+		Group *			THIS;
+		const char *	RETVAL;
 		dXSTARG;
 
 		if (sv_derived_from(ST(0), "Group")) {