From: Banana <banana@starscream.de>
Date: Mon, 3 Dec 2012 15:14:24 +0000 (+0100)
Subject: testing. warnings erros...
X-Git-Tag: 2.1-alpha-2019-0-29~69
X-Git-Url: http://91.132.146.200/gitweb/?a=commitdiff_plain;h=7ebc0a89676e46bf9299d76bbbedc5576acf1e69;p=insipid.git

testing. warnings erros...
---

diff --git a/lib/Insipid/Main.pm b/lib/Insipid/Main.pm
index 12b0049..b8dbfa7 100755
--- a/lib/Insipid/Main.pm
+++ b/lib/Insipid/Main.pm
@@ -944,7 +944,7 @@ sub show_toolbar {
 
 sub delete_bookmark {
     my ($id) = (@_);
-    my ($sql, $sth, $md5) = ("", "", "");
+    my ($sql, $sth) = ("", "", "");
 
     check_access();
 
diff --git a/lib/Insipid/Tags.pm b/lib/Insipid/Tags.pm
index 46e681b..9e95daa 100755
--- a/lib/Insipid/Tags.pm
+++ b/lib/Insipid/Tags.pm
@@ -154,14 +154,14 @@ sub show_tags {
 	my ($mode) = shift;
 	if(!defined($mode)) { $mode = 0; }
 
-	my ($sql, $sth);
+	my ($sql, $sth, $tagstring = '');
 	if($mode eq 0) { print "<div id=\"leftside\">"; }
 
 	my $tag = url_param('tag');
 
 	#if()) {
 		# find the tags which have been used with this tags too
-		my $tagstring = $tag;
+		$tagstring = $tag;
 		chomp($tagstring);
 		$tagstring =~ s/ /','/g;