openpgp: Add KeyAmalgamation::component.

1 files changed, 8 insertions, 0 deletions

diff --git a/openpgp/src/cert/key_amalgamation.rs b/openpgp/src/cert/key_amalgamation.rs
index d71b4569..12860c8f 100644
--- a/openpgp/src/cert/key_amalgamation.rs
+++ b/openpgp/src/cert/key_amalgamation.rs
@@ -345,4 +345,12 @@ impl<'a, P: 'a + key::KeyParts> KeyAmalgamation<'a, P> {
             false
         }
     }
+
+    /// Returns this key's component.
+    pub fn component(&self) -> &'a KeyBinding<P, key::UnspecifiedRole> {
+        match &self.0 {
+            KeyAmalgamation0::Primary(h) => h.binding.into(),
+            KeyAmalgamation0::Subordinate(h) => h.binding.into(),
+        }
+    }
 }