openpgp: Add method to return the primary key component.

1 files changed, 6 insertions, 0 deletions

diff --git a/openpgp/src/cert/keyiter.rs b/openpgp/src/cert/keyiter.rs
index b5e04fcc..bd0d648e 100644
--- a/openpgp/src/cert/keyiter.rs
+++ b/openpgp/src/cert/keyiter.rs
@@ -333,6 +333,12 @@ impl<'a, P: 'a + key::KeyParts, R: 'a + key::KeyRole> KeyIter<'a, P, R>
         }
     }
 
+    /// Returns the primary key component.
+    pub fn primary_key(&self)
+                       -> &'a KeyBinding<key::PublicParts, key::PrimaryRole> {
+        &self.cert.as_ref().unwrap().primary
+    }
+
     /// Changes the iterator to return subkey components.
     ///
     /// A key component is similar to a key amalgamation, but is not