Add file properties dialog.

[guestfs-browser.git] / main.ml

diff --git a/main.ml b/main.ml
index f8a368d..69ee4e1 100644 (file)
--- a/main.ml
+++ b/main.ml
@@ -65,6 +65,8 @@ let () =
             ~callback:(Op_download_file.download_file tree));
   ignore (tree#op_file_information
             ~callback:(Op_file_information.file_information tree));
+  ignore (tree#op_file_properties
+            ~callback:(Op_file_properties.file_properties tree));
   ignore (tree#op_inspection_dialog
             ~callback:(Op_inspection_dialog.inspection_dialog tree));
   ignore (tree#op_view_file