---
builder/builder.ml | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/builder/builder.ml b/builder/builder.ml
index 1800f2d..274edfe 100644
--- a/builder/builder.ml
+++ b/builder/builder.ml
@@ -215,11 +215,12 @@ let main () =
(match mode with
| `Notes -> (* --notes *)
- (match entry with
- | { Index_parser.notes = ("", notes) :: _ } ->
- print_endline notes;
- | { Index_parser.notes = _ :: _ }
- | { Index_parser.notes = [] } ->
+ let notes =
+ Languages.find_notes (Languages.languages ()) entry.Index_parser.notes in
+ (match notes with
+ | notes :: _ ->
+ print_endline notes
+ | [] ->
printf (f_"There are no notes for %s\n") arg
);
exit 0
--
1.8.3.1