Kristian Fiskerstrand avatar Kristian Fiskerstrand committed 035efe2

cleanup

Comments (0)

Files changed (1)

 
 diff -r 3c75386bc7ce CHANGELOG
 --- a/CHANGELOG	Sat Oct 27 23:15:53 2012 +0200
-+++ b/CHANGELOG	Wed Nov 07 22:17:35 2012 +0100
++++ b/CHANGELOG	Wed Nov 07 22:19:48 2012 +0100
 @@ -3,6 +3,7 @@
      from self-signatures on the key's UIDs. In addition, instead of 8-digit
      key IDs, index entries now return the most specific key ID possible:
    - Fix X-HKP-Results-Count so that limit=0 returns no results, but include
 diff -r 3c75386bc7ce sksdump.ml
 --- a/sksdump.ml	Sat Oct 27 23:15:53 2012 +0200
-+++ b/sksdump.ml	Wed Nov 07 22:17:35 2012 +0100
-@@ -80,9 +80,37 @@
++++ b/sksdump.ml	Wed Nov 07 22:19:48 2012 +0100
+@@ -80,9 +80,40 @@
      let file = open_out fname in
      protect ~f:(fun () -> write_to_file size stream file)
        ~finally:(fun () -> close_out file)
 +   output_string file (sprintf "#Key-Count: %d\n" numkey);
 +   output_string file (sprintf "#Checksums:\n");
 +   while !c < ctr do 
-+     output_string file (sprintf "%s %s-%04d.pgp\n" (Digest.to_hex(Digest.file (Filename.concat dumpdir (sprintf "%s-%04d.pgp" name !c)))) name !c);
++     output_string file (sprintf "%s %s-%04d.pgp\n" (Digest.to_hex(
++      Digest.file (Filename.concat dumpdir (sprintf "%s-%04d.pgp" name !c)))) 
++      name !c);
 +     incr c
 +   done;
-+   output_string file (sprintf "#Dump-ended: %s\n" (time_to_string (Unix.gettimeofday())));
++   output_string file (sprintf "#Dump-ended: %s\n" (time_to_string 
++                                                 (Unix.gettimeofday())));
 +   close_out file;
 +   ()
 +  
      let run () =
        let ctr = ref 0 in
        while SStream.peek stream <> None do
-@@ -91,7 +119,8 @@
+@@ -91,7 +122,8 @@
          in
          write_to_fname size stream fname;
          incr ctr
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.