Source

perl/keyring/kdewallet / lib / Passwd / Keyring / KDEWallet.pm

Diff from to

File lib/Passwd/Keyring/KDEWallet.pm

         $password = <somehow interactively prompt for password>;
 
         # securely save password for future use
-        $keyring->set_password($username, "blahblah.com");
+        $keyring->set_password($username, $password, "blahblah.com");
     }
 
     login_somewhere_using($username, $password);