summaryrefslogtreecommitdiffstats
path: root/otherlibs/labltk/browser/jg_text.ml
diff options
context:
space:
mode:
authorJacques Garrigue <garrigue at math.nagoya-u.ac.jp>2002-08-09 10:34:44 +0000
committerJacques Garrigue <garrigue at math.nagoya-u.ac.jp>2002-08-09 10:34:44 +0000
commitc9b77a613c84fefffe7cb824c72419172ed7ae46 (patch)
tree8096ab8ba03a572227baf59fa04009a9c7abfcd2 /otherlibs/labltk/browser/jg_text.ml
parentb920dbd56c1e403a429f5001832fb05d72ee05b6 (diff)
last changes
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@5094 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'otherlibs/labltk/browser/jg_text.ml')
-rw-r--r--otherlibs/labltk/browser/jg_text.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/otherlibs/labltk/browser/jg_text.ml b/otherlibs/labltk/browser/jg_text.ml
index 5a7023f63..067b9dac5 100644
--- a/otherlibs/labltk/browser/jg_text.ml
+++ b/otherlibs/labltk/browser/jg_text.ml
@@ -48,7 +48,7 @@ let goto_tag tw ~tag =
let search_string tw =
let tl = Jg_toplevel.titled "Search" in
- Wm.transient_set tl ~master:Widget.default_toplevel;
+ Wm.transient_set tl ~master:(Winfo.toplevel tw);
let fi = Frame.create tl
and fd = Frame.create tl
and fm = Frame.create tl