Commits

Kristian Fiskerstrand  committed 7918a0a

Convert keyid back to hex string

  • Participants
  • Parent commits 6e6e922

Comments (0)

Files changed (1)

File Use Long KeyID

 
 diff -r e2d4ec6c2147 mRindex.ml
 --- a/mRindex.ml	Fri Aug 10 20:50:24 2012 +0200
-+++ b/mRindex.ml	Tue Aug 14 22:06:37 2012 +0200
-@@ -99,7 +99,6 @@
++++ b/mRindex.ml	Tue Aug 14 22:13:02 2012 +0200
+@@ -99,7 +99,7 @@
  
  let key_to_lines key =
    let full_keyid = Fingerprint.keyid_from_key ~short:false key in
 -  let keyid = Fingerprint.keyid_to_string ~short:true full_keyid in
++  let keyid = Fingerprint.keyid_to_string ~short:false full_keyid in
    let pkey = KeyMerge.key_to_pkey key in
    let key_packet = pkey.KeyMerge.key in
    let pki = ParsePGP.parse_pubkey_info key_packet in
-@@ -111,7 +110,7 @@
-         (Int64.add pki.pk_ctime (Int64.mul daysecs (Int64.of_int days)))
-   in
-   let key_line = sprintf "pub:%s:%d:%d:%Ld:%s:%s"
--                   keyid
-+                   full_keyid
-                    pki.pk_alg
-                    pki.pk_keylen
-                    pki.pk_ctime