search for: print_notes

Displaying 6 results from an estimated 6 matches for "print_notes".

Did you mean: print_modes
2014 May 26
2
[PATCH] builder: support aliases for images (RHBZ#1098718).
...t key = function + | None -> () + | Some l -> + printf " \"%s\": [" key; + iteri ( + fun i alias -> + printf " \"%s\"%s" alias (trailing_comma i (List.length l)) + ) l; + printf " ],\n" in let print_notes = function | [] -> () | notes -> @@ -156,6 +171,7 @@ and list_entries_json ~sources index = size = size; compressed_size = compressed_size; notes = notes; + aliases = aliases; hidden =...
2014 Oct 10
0
[PATCH 3/3] builder: use the JSON module
...t key = function - | None -> () - | Some l -> - printf " \"%s\": [" key; - iteri ( - fun i alias -> - printf " \"%s\"%s" alias (trailing_comma i (List.length l)) - ) l; - printf " ],\n" in - let print_notes = function - | [] -> () - | notes -> - printf " \"notes\": {\n"; - iteri ( - fun i (lang, langnotes) -> - let lang = - match lang with - | "" -> "C" - | x -> x in - pr...
2014 Jan 22
2
[PATCH] builder: read all the available notes from the index
...tf (f_"Notes:\n\n%s\n") notes + | _ -> () ); printf "\n" ) @@ -108,6 +108,10 @@ and list_entries_json ~sources index = | None -> () | Some n -> printf " \"%s\": \"%Ld\",\n" key n in + let print_notes = function + | ("", notes) :: _ -> + printf " \"notes\": \"%s\",\n" (json_string_escape notes) + | _ -> () in printf "{\n"; printf " \"version\": %d,\n" 1; @@ -132,7 +136,7 @@ and list_entries_json ~s...
2014 Feb 24
2
[PATCH] builder: add a mandatory 'arch' key in index files
...; json_optional_printf_string "full-name" printable_name; + printf " \"arch\": \"%s\",\n" arch; printf " \"size\": %Ld,\n" size; json_optional_printf_int64 "compressed-size" compressed_size; print_notes notes; diff --git a/builder/test-index.in b/builder/test-index.in index 1bca6b8..3efebc4 100644 --- a/builder/test-index.in +++ b/builder/test-index.in @@ -1,5 +1,6 @@ [phony-debian] name=Phony Debian +arch=x86_64 file=debian.xz format=raw size=536870912 @@ -9,6 +10,7 @@ notes=Phony Debian loo...
2014 Oct 10
4
[PATCH 1/3] Move JSON to mllib
Move the simple OCaml JSON writer to mllib, so that can be enhanced and used also outside v2v. --- mllib/JSON.ml | 53 +++++++++++++++++++++++++++++++++++++++++++++++++++++ mllib/JSON.mli | 26 ++++++++++++++++++++++++++ mllib/Makefile.am | 5 ++++- po/POTFILES-ml | 2 +- v2v/JSON.ml | 53 ----------------------------------------------------- v2v/JSON.mli | 26
2014 Jan 30
2
[PATCH] builder: output translated notes
...printf (f_"Notes:\n\n%s\n") notes - | _ :: _ | [] -> () ); printf "\n" @@ -108,10 +139,20 @@ and list_entries_json ~sources index = | Some n -> printf " \"%s\": \"%Ld\",\n" key n in let print_notes = function - | ("", notes) :: _ -> - printf " \"notes\": \"%s\",\n" (json_string_escape notes) - | _ :: _ - | _ -> () in + | [] -> () + | notes -> + printf " \"notes\": {\n"; + iteri ( +...