X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-File-KDBX;a=blobdiff_plain;f=lib%2FFile%2FKDBX%2FGroup.pm;h=bbd3fc2b4a42519fae77598bc248ac1c1d6251a5;hp=0c784cdbf5712df4d82d06aa077e9dca515f7f59;hb=8ccefe1cedea9b0886a44ad096aa5710528eaac7;hpb=00078cf200c23f392322f4fdc29e4f44ddf73f41

diff --git a/lib/File/KDBX/Group.pm b/lib/File/KDBX/Group.pm
index 0c784cd..bbd3fc2 100644
--- a/lib/File/KDBX/Group.pm
+++ b/lib/File/KDBX/Group.pm
@@ -447,7 +447,7 @@ sub effective_default_auto_type_sequence {
     my $sequence = $self->default_auto_type_sequence;
     return $sequence if defined $sequence;
 
-    my $parent = $self->parent or return '{USERNAME}{TAB}{PASSWORD}{ENTER}';
+    my $parent = $self->group or return '{USERNAME}{TAB}{PASSWORD}{ENTER}';
     return $parent->effective_default_auto_type_sequence;
 }
 
@@ -456,7 +456,7 @@ sub effective_enable_auto_type {
     my $enabled = $self->enable_auto_type;
     return $enabled if defined $enabled;
 
-    my $parent = $self->parent or return true;
+    my $parent = $self->group or return true;
     return $parent->effective_enable_auto_type;
 }
 
@@ -465,7 +465,7 @@ sub effective_enable_searching {
     my $enabled = $self->enable_searching;
     return $enabled if defined $enabled;
 
-    my $parent = $self->parent or return true;
+    my $parent = $self->group or return true;
     return $parent->effective_enable_searching;
 }