From 2c0c19502fd69600f6b20fadfed319f3400d94e4 Mon Sep 17 00:00:00 2001
From: Heiko Schaefer <heiko@schaefer.name>
Date: Tue, 26 Oct 2021 14:45:05 +0200
Subject: [PATCH] Add change_user_pin() and change_admin_pin()

---
 openpgp-card-sequoia/src/card.rs | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/openpgp-card-sequoia/src/card.rs b/openpgp-card-sequoia/src/card.rs
index a1e2085..22227ff 100644
--- a/openpgp-card-sequoia/src/card.rs
+++ b/openpgp-card-sequoia/src/card.rs
@@ -104,6 +104,23 @@ impl Open {
     pub fn check_admin_verified(&mut self) -> Result<Response, Error> {
         self.card_app.check_pw3()
     }
+
+    pub fn change_user_pin(
+        &mut self,
+        old: &str,
+        new: &str,
+    ) -> Result<Response, Error> {
+        self.card_app.change_pw1(old, new)
+    }
+
+    pub fn change_admin_pin(
+        &mut self,
+        old: &str,
+        new: &str,
+    ) -> Result<Response, Error> {
+        self.card_app.change_pw3(old, new)
+    }
+
     /// Get a view of the card authenticated for "User" commands.
     pub fn user_card(&mut self) -> Option<User> {
         if self.pw1 {