From: wbudic Date: Fri, 13 Aug 2021 07:46:26 +0000 (+1000) Subject: Forcing renumeration on del. now. X-Git-Url: https://lifelog.hopto.org/gitweb/?a=commitdiff_plain;h=9e03b970044e9e5354e310bb0009740a61e5e86c;p=LifeLog.git Forcing renumeration on del. now. --- 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 "".$d->ymd()." ".$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 "

Error->"& $_ &"

"; $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("ERROR " . $@); - exit; } - } sub printHeader {