- $text = substr($text, 0, $duplth) if length $text > $duplth;
- my $ldupkey = $oldstyle ? "X|$call|$by|$node|$freq|$d|$text" : "X|$call|$by|$qrg|$nd|$text";
+ $text = substr($text, 0, $duplth) if length $text > $duplth;
+
+ $l = length $text;
+ $dtext .= qq{->final:'$text'($l)} if isdbg('spottext');
+
+ my $t = 0;
+ my $ldupkey;
+
+ # new feature: don't include the origin node in Spot dupes
+ # default = true
+ unless ($no_node_in_dupe) {
+ $ldupkey = $oldstyle ? "X|$call|$by|$node|$freq|$d|$text" : "X|$call|$by|$node|$qrg|$nd|$text";