Renumber.pm (gscan2pdf-2.13.1.tar.xz) | : | Renumber.pm (gscan2pdf-2.13.2.tar.xz) | ||
---|---|---|---|---|
skipping to change at line 72 | skipping to change at line 72 | |||
[qw/readable writable/] # flags | [qw/readable writable/] # flags | |||
), | ), | |||
Glib::ParamSpec->scalar( | Glib::ParamSpec->scalar( | |||
'logger', # name | 'logger', # name | |||
'Logger', # nick | 'Logger', # nick | |||
'Log::Log4perl::get_logger object', # blurb | 'Log::Log4perl::get_logger object', # blurb | |||
[qw/readable writable/] # flags | [qw/readable writable/] # flags | |||
), | ), | |||
]; | ]; | |||
our $VERSION = '2.13.1'; | our $VERSION = '2.13.2'; | |||
my ( $start_old, $step_old, $logger ); | my ( $start_old, $step_old, $logger ); | |||
# Normally, we would initialise the widget in INIT_INSTANCE and use the | # Normally, we would initialise the widget in INIT_INSTANCE and use the | |||
# default constructor new(). However, we have to override the default contructor | # default constructor new(). However, we have to override the default contructor | |||
# in order to be able to access any properties assigned in ->new(), which are | # in order to be able to access any properties assigned in ->new(), which are | |||
# not available in INIT_INSTANCE. Therefore, we use the default INIT_INSTANCE, | # not available in INIT_INSTANCE. Therefore, we use the default INIT_INSTANCE, | |||
# and override new(). If we ever need to subclass Gscan2pdf::Dialog::Renumber, | # and override new(). If we ever need to subclass Gscan2pdf::Dialog::Renumber, | |||
# then we would need to put the bulk of this code back into INIT_INSTANCE, | # then we would need to put the bulk of this code back into INIT_INSTANCE, | |||
# and leave just that which assigns the required properties. | # and leave just that which assigns the required properties. | |||
End of changes. 1 change blocks. | ||||
1 lines changed or deleted | 1 lines changed or added |