From c3817ac368982d804f37c526290316be7a050bb2 Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Thu, 13 Mar 2025 16:58:17 +0000 Subject: [PATCH] adjust notext dedupe comment --- perl/Spot.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/Spot.pm b/perl/Spot.pm index 0a3baf7e..4c88e0b1 100644 --- a/perl/Spot.pm +++ b/perl/Spot.pm @@ -567,7 +567,7 @@ sub dup_add $ldupkey = "X$call|$by|$qrg"; $t = DXDupe::find($ldupkey); $storet = !$t && !$just_find ? ' STORE=>'.htime($main::systime+$store_nocomment) :''; - dbg("Spot::add_dup: $check (NOTEXT) ldupkey $ldupkey $storet". ($t?(' (DUPE=>'.htime($t)) :'')) if isdbg('spotdup'); + dbg("Spot::add_dup: $check (NOTEXT) ldupkey $ldupkey $storet". ($t?(' (DUPE=>'.htime($t)) :'')) if isdbg('spotdup'); # see above if ($t > 0) { # DXDupe::add($ldupkey, $main::systime+$dupage) unless $just_find; -- 2.43.0