summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xdraksnapshot-config15
1 files changed, 5 insertions, 10 deletions
diff --git a/draksnapshot-config b/draksnapshot-config
index 69575a7..91ac3ca 100755
--- a/draksnapshot-config
+++ b/draksnapshot-config
@@ -248,24 +248,19 @@ sub add {
my $browse = gtknew('Button', text => N("browse"));
my $file = gtknew('Entry', $o_iter ? (text => $model->get($o_iter, 1)) : ());
my $alrd_exsts = defined $o_iter;
- my $filename_choice;
$browse->signal_connect(clicked => sub {
- my $file_dlg = Gtk3::FileChooserDialog->new(N("Path selection"),$dlg, GTK_FILE_CHOOSER_ACTION_SELECT_FOLDER,N("Cancel") => GTK_RESPONSE_CANCEL,N("OK") => GTK_RESPONSE_OK);
+ my $file_dlg = Gtk3::FileChooserDialog->new(N("Path selection"), $dlg, GTK_FILE_CHOOSER_ACTION_SELECT_FOLDER, N("Cancel") => GTK_RESPONSE_CANCEL, N("OK") => GTK_RESPONSE_OK);
$file_dlg->set_modal(1);
$file_dlg->set_transient_for($dlg);
$file_dlg->show;
$file_dlg->set_filename($file->get_text);
my $answer_add=$file_dlg->run;
- if ( $answer_add eq 'cancel' )
- {
+ if ($answer_add eq 'cancel') {
$file_dlg->destroy;
- }
- else
- {
- if ( $answer_add eq 'ok' ){
- $filename_choice=$file_dlg->get_filename;
+ } else {
+ if ($answer_add eq 'ok') {
$file->set_text($file_dlg->get_filename);
$file_dlg->destroy;
}
@@ -273,7 +268,7 @@ sub add {
});
- gtkpack_($dlg->get_content_area(),
+ gtkpack_($dlg->get_content_area,
0, gtknew('Title2', label => N("Path")),
0, gtknew('HBox', border_width => 18, children => [
1, $file,