diff options
-rwxr-xr-x | userdrake | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -668,10 +668,10 @@ sub BuildGui { sub NewWindow { my ($title) = @_; - my $w = gtkset_border_width(_create_dialog($title, { transient_for => $us->{wnd}{real_window} }), + my $dialog = gtkset_border_width(_create_dialog($title, { transient_for => $us->{wnd}{real_window} }), 5); - $w->signal_connect(delete_event => sub { $w->destroy }); - $w; + $dialog->signal_connect(delete_event => sub { $dialog->destroy }); + $dialog; } sub Edit() { |