"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "lib/Gscan2pdf/Dialog/Scan/CLI.pm" between
gscan2pdf-2.13.1.tar.xz and gscan2pdf-2.13.2.tar.xz

About: gscan2pdf is a GUI to produce PDFs from scanned documents (using Perl).

CLI.pm  (gscan2pdf-2.13.1.tar.xz)	:	CLI.pm  (gscan2pdf-2.13.2.tar.xz)
skipping to change at line 84		skipping to change at line 84
[qw/readable writable/] # flags		[qw/readable writable/] # flags
),		),
Glib::ParamSpec->scalar(		Glib::ParamSpec->scalar(
'options-cache', # name		'options-cache', # name
'Options cache', # nick		'Options cache', # nick
'Hash containing cache of scanner options', # blurb		'Hash containing cache of scanner options', # blurb
[qw/readable writable/] # flags		[qw/readable writable/] # flags
),		),
];		];
our $VERSION = '2.13.1';		our $VERSION = '2.13.2';
my $SANE_NAME_PAGE_HEIGHT = SANE_NAME_PAGE_HEIGHT;		my $SANE_NAME_PAGE_HEIGHT = SANE_NAME_PAGE_HEIGHT;
my $SANE_NAME_PAGE_WIDTH = SANE_NAME_PAGE_WIDTH;		my $SANE_NAME_PAGE_WIDTH = SANE_NAME_PAGE_WIDTH;
sub INIT_INSTANCE {		sub INIT_INSTANCE {
my $self = shift;		my $self = shift;
$d_sane = Locale::gettext->domain('sane-backends');		$d_sane = Locale::gettext->domain('sane-backends');
return $self;		return $self;
}		}
skipping to change at line 490		skipping to change at line 490
}		}
$widget->{signal} = $widget->signal_connect(		$widget->{signal} = $widget->signal_connect(
activate => sub {		activate => sub {
$self->{num_reloads} = 0; # num-reloads is read-only		$self->{num_reloads} = 0; # num-reloads is read-only
my $value = $widget->get_text;		my $value = $widget->get_text;
$self->set_option( $opt, $value );		$self->set_option( $opt, $value );
}		}
);		);
}		}
}		}
else { # $opt->{max_values} > 1		else { # $opt->{max_values} > 1
$widget = Gtk3::Button->new( $d_sane->get( $opt->{title} ) );		$widget = Gtk3::Button->new( $d_sane->get( $opt->{title} ) );
$widget->{signal} = $widget->signal_connect(		$widget->{signal} = $widget->signal_connect(
clicked => \&multiple_values_button_callback,		clicked => \&multiple_values_button_callback,
[ $self, $opt ]		[ $self, $opt ]
);		);
}		}
$self->pack_widget( $widget, [ $options, $opt, $hbox, $hboxp ] );		$self->pack_widget( $widget, [ $options, $opt, $hbox, $hboxp ] );
}		}
End of changes. 2 change blocks.
2 lines changed or deleted		2 lines changed or added

---