From 2851e70ffac0e2074a8fc3111410e42c16999bb2 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Mon, 14 Sep 2015 21:25:01 +0200
Subject: grt: add --list-features, and --has-feature

---
 src/grt/grt-disp_tree.adb | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'src/grt/grt-disp_tree.adb')

diff --git a/src/grt/grt-disp_tree.adb b/src/grt/grt-disp_tree.adb
index 3eb715d3f..8ff87eebb 100644
--- a/src/grt/grt-disp_tree.adb
+++ b/src/grt/grt-disp_tree.adb
@@ -449,7 +449,9 @@ package body Grt.Disp_Tree is
    end Disp_Tree_Help;
 
    Disp_Tree_Hooks : aliased constant Hooks_Type :=
-     (Option => Disp_Tree_Option'Access,
+     (Desc => new String'
+        ("disp-tree: display design hierarchy (--disp-tree)"),
+      Option => Disp_Tree_Option'Access,
       Help => Disp_Tree_Help'Access,
       Init => null,
       Start => Disp_Hierarchy'Access,
-- 
cgit v1.2.3