-*) ()
-;;
-
-let activate_t1 mathview sw () =
- mathview :=
- (GMathView.math_view ~packing:sw#add ~width:50 ~height:50
- ~use_t1_lib:true ()) ;
- ignore(!mathview#connect#jump jump) ;
- ignore(!mathview#connect#clicked clicked) ;
- ignore(!mathview#connect#selection_changed selection_changed) ;
- print_string "WIDGET RECREATED WITH T1 FONTS ACTIVATED\n" ;