test/test.ml: added a call to reset_selection

diff --git a/helm/DEVEL/lablgtk_gtkmathview/lablgtk-20000829_gtkmathview-0.2.1/test/test.ml b/helm/DEVEL/lablgtk_gtkmathview/lablgtk-20000829_gtkmathview-0.2.1/test/test.ml
index f54c3bb1905682388b7f895037387a95923d42f2..a8e184bc43e084888349e072253d73f981fb346b 100644 (file)
--- a/helm/DEVEL/lablgtk_gtkmathview/lablgtk-20000829_gtkmathview-0.2.1/test/test.ml
+++ b/helm/DEVEL/lablgtk_gtkmathview/lablgtk-20000829_gtkmathview-0.2.1/test/test.ml
@@ -23,7 +23,9 @@ let selection_changed mathview (node : Ominidom.o_mDOMNode option) =
  let module O = Ominidom in
   print_string ("selection_changed: " ^
    (match node with
-       None -> "selection_changed on nothing"
+       None ->
+         mathview#reset_selection;
+         "selection_changed on nothing"
      | Some node ->
         try
          mathview#set_selection node ;