From 0a6b556943dbe970e0cf764b030718f3a1361816 Mon Sep 17 00:00:00 2001 From: Russ Allbery Date: Wed, 27 Mar 2013 16:14:40 -0700 Subject: Register the wa-keyring object handler by default In Wallet::Admin, add the wa-keyring object handler to the list of initializations when creating a new database. Change-Id: I804b47ae712ce3d96c57699fb2ba05c45f687881 Reviewed-on: https://gerrit.stanford.edu/986 Reviewed-by: Russ Allbery Tested-by: Russ Allbery --- perl/Wallet/Admin.pm | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'perl/Wallet') diff --git a/perl/Wallet/Admin.pm b/perl/Wallet/Admin.pm index 97a2c15..42476e9 100644 --- a/perl/Wallet/Admin.pm +++ b/perl/Wallet/Admin.pm @@ -125,8 +125,9 @@ sub default_data { # types default rows. my @record = ([ qw/ty_name ty_class/ ], - [ 'file', 'Wallet::Object::File' ], - [ 'keytab', 'Wallet::Object::Keytab' ]); + [ 'file', 'Wallet::Object::File' ], + [ 'keytab', 'Wallet::Object::Keytab' ], + [ 'wa-keyring', 'Wallet::Object::WAKeyring' ]); ($r1) = $self->{schema}->resultset('Type')->populate (\@record); warn "default Type not installed" unless defined $r1; -- cgit v1.2.3