From: Metabox <redacted>
Date: Mon, 5 Aug 2019 06:44:03 +0000 (+1000)
Subject: Code error in delete statments fro NOTES table.
X-Git-Url: https://lifelog.hopto.org/gitweb/?a=commitdiff_plain;h=7b680ff7ce667981b9b3f02c63c6deb8f0786b6d;p=LifeLog.git

Code error in delete statments fro NOTES table.
---

diff --git a/htdocs/cgi-bin/remove.cgi b/htdocs/cgi-bin/remove.cgi
index d983af7..6c711c3 100755
--- a/htdocs/cgi-bin/remove.cgi
+++ b/htdocs/cgi-bin/remove.cgi
@@ -149,13 +149,12 @@ return "<b>".$d->ymd."</b> ".$d->hms;
 
 sub ConfirmedDelition{
 
-	my $stmS = 'DELETE FROM LOG WHERE '; 
 
 	foreach my $prm ($cgi->param('chk')){
-		$stm = qq(DELETE FROM LOG WHERE rowid = '$prm';);
-	    $st = $db->prepare( $stm );
+		
+	    $st = $db->prepare("DELETE FROM LOG WHERE rowid = '$prm';");
 		$rv = $st->execute() or die or die "<p>Error->"& $DBI::errstri &"</p>";
-		$stm = qq(DELETE FROM NOTES WHERE LID = '$prm';);
+		$st = $st = $db->prepare("DELETE FROM NOTES WHERE LID = '$prm';");
 		$rv = $st->execute();
 
 		if($rv < 0) {