#!/bin/sh
-#$Id: snom.pl,v 1.2 2006-05-21 11:55:57 simigern Exp $
+#$Id: snom.pl,v 1.3 2006-05-21 11:58:47 simigern Exp $
PATH=/opt/csw/bin:/opt/local/bin:/usr/bin:/bin exec perl -w -x "$0" "$@"
$window->add($mainbox);
$window->show();
+$key{OK}->grab_focus();
+
# Gtk2 event loop
Gtk2->main;