From 7c8a454d3c2e4f141ae97a35f3960f8129add112 Mon Sep 17 00:00:00 2001 From: Pascal Brisset Date: Sun, 17 Jun 2007 16:41:24 +0000 Subject: [PATCH] misc f help --- sw/lib/ocaml/mapCanvas.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sw/lib/ocaml/mapCanvas.ml b/sw/lib/ocaml/mapCanvas.ml index 85a07ca5b4..1adbbc6fe6 100644 --- a/sw/lib/ocaml/mapCanvas.ml +++ b/sw/lib/ocaml/mapCanvas.ml @@ -622,7 +622,7 @@ class widget = fun ?(height=800) ?width ?projection ?georef () -> my_check_menu_item "UTM Grid" ~active:false ~callback:self#switch_utm_grid ~packing:self#file_menu#append (); my_check_menu_item "Background" ~active:true ~callback:self#switch_background ~packing:self#file_menu#append (); my_menu_item "Goto" ~callback:self#goto ~packing:self#file_menu#append (); - my_menu_item "Fit to window" ~callback:self#fit_to_window ~packing:self#file_menu#append (); + my_menu_item "Fit to window (f)" ~callback:self#fit_to_window ~packing:self#file_menu#append (); let callback = fun () -> selected_georef <- None in my_menu_item "WGS84" ~packing:georef_menu#append ~callback ();