From 294c94573af6a5a0accea239d4fba777a4d9c9b8 Mon Sep 17 00:00:00 2001
From: Timo Sirainen <cras@irssi.org>
Date: Mon, 3 Dec 2001 13:05:46 +0000
Subject: [PATCH] removed unused variable

git-svn-id: http://svn.irssi.org/repos/irssi/trunk@2178 dbcabf3a-b0e7-0310-adc4-f8d773084564
---
 src/perl/perl-core.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/perl/perl-core.c b/src/perl/perl-core.c
index aa774cc6..5d790a5e 100644
--- a/src/perl/perl-core.c
+++ b/src/perl/perl-core.c
@@ -169,7 +169,7 @@ void perl_scripts_deinit(void)
    translated to '_' */
 void script_fix_name(char *name)
 {
-	char *ret, *p;
+	char *p;
 
 	p = strrchr(name, '.');
 	if (p != NULL) *p = '\0';