From 9e03b970044e9e5354e310bb0009740a61e5e86c Mon Sep 17 00:00:00 2001
From: wbudic <vilijanac@gmail.com>
Date: Fri, 13 Aug 2021 17:46:26 +1000
Subject: [PATCH] Forcing renumeration on del. now.

---
 htdocs/cgi-bin/data.cgi | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/htdocs/cgi-bin/data.cgi b/htdocs/cgi-bin/data.cgi
index 648b53e..dd75069 100755
--- a/htdocs/cgi-bin/data.cgi
+++ b/htdocs/cgi-bin/data.cgi
@@ -113,7 +113,6 @@ return "<b>".$d->ymd()."</b> ".$d->hms;
 
 
 sub DeletionConfirmed {
-
 try{    
     my $SQLID = 'rowid'; $SQLID = 'ID' if Settings::isProgressDB();
     my $st1 = $db->prepare("DELETE FROM LOG WHERE $SQLID = ?;");
@@ -125,14 +124,14 @@ try{
         $st1->execute($id) or die "<p>Error->"& $_ &"</p>";        
         $st2->execute($id) if $ra[0];
     }
-    Settings::renumerate($db);#<- 2021-08-11 Added just in case renumeration. Above also chack now if log was flagged an RTF before deleting note entry.
+   #2021-08-11 Added just in case next an renumeration. 
+   # Above also checks now, if a log has flagged having an RTF before deleting the note entry.
+   Settings::renumerate($db);
    print $cgi->redirect('main.cgi');  
 
 }catch{
     print $cgi->p("<font color=red><b>ERROR</b></font>  " . $@);
-    exit;
 }
-
 }
 
 sub printHeader {
-- 
2.34.1