X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-File-KDBX;a=blobdiff_plain;f=lib%2FFile%2FKDBX%2FObject.pm;h=7c538bf3df44d7b234b942b03df91713155dd119;hp=bcbfd58c86451544c829abfbb6654b024a4eb4ad;hb=c98fc7d0294e641cf8844306808333bdec4fea2f;hpb=1d0a10e989a4d0487aa13cf4f56e533d3795469d diff --git a/lib/File/KDBX/Object.pm b/lib/File/KDBX/Object.pm index bcbfd58..7c538bf 100644 --- a/lib/File/KDBX/Object.pm +++ b/lib/File/KDBX/Object.pm @@ -353,6 +353,8 @@ Remove the object from the database. If the object is a group, all contained obj =cut sub remove { + # TODO - need a way to not signal database because there are times like in the KDB loader and meta streams + # where we do not want to add UUIDs to deleted objects my $self = shift; my $parent = $self->parent; $parent->remove_object($self) if $parent;