Commits

Marcin Kasperski committed eba387a

Working toward impl.

Comments (0)

Files changed (2)

experiments/kwallet_by_dbus.pl

   or die "No net wallet";
 say "net_wallet id: $net_wallet";
 
-my $handle = $kwallet->open($net_wallet, 0, $APP_NAME)
-  or die "No handle";
+my $handle = $kwallet->open($net_wallet, 0, $APP_NAME); # 0 - window id
+$handle > 0 or die "No handle"; # decline means -1
 say "Opened, handle = $handle";
 
 my $is_open = $kwallet->isOpen($handle);

lib/Passwd/Keyring/KDEWallet.pm

 our $VERSION = '0.21';
 
 our $APP_NAME = "Passwd::Keyring";
+our $FOLDER_NAME = "Perl-Passwd-Keyring";
 
 =head1 SYNOPSIS