diff --git a/basis/ui/backend/gtk/gtk-docs.factor b/basis/ui/backend/gtk/gtk-docs.factor new file mode 100644 index 0000000000..5c928900d2 --- /dev/null +++ b/basis/ui/backend/gtk/gtk-docs.factor @@ -0,0 +1,7 @@ +USING: gtk.ffi help.markup help.syntax ; +IN: ui.backend.gtk + +HELP: configure-im +{ $values { "win" GtkWindow } { "im" GtkIMContext } } +{ $description "Configures the input methods of the window. Must only be run after the window hasbeen realized." } +{ $see-also gtk_widget_realize } ; diff --git a/basis/ui/backend/gtk/gtk.factor b/basis/ui/backend/gtk/gtk.factor index 87846ffe78..50f00a43f2 100644 --- a/basis/ui/backend/gtk/gtk.factor +++ b/basis/ui/backend/gtk/gtk.factor @@ -467,11 +467,11 @@ M:: gtk-ui-backend (open-window) ( world -- ) gtk_window_set_wmclass world configure-gl + win gtk_widget_realize + win im configure-im win connect-user-input-signals win connect-win-state-signals - - win gtk_widget_realize win world window-controls>> configure-window-controls win gtk_widget_show_all ;