You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
32 lines
464 B
32 lines
464 B
package ksb::Updater; |
|
|
|
# Base class for classes that handle updating the source code for a given ksb::Module. |
|
# It should not be used directly. |
|
|
|
use strict; |
|
use warnings; |
|
use 5.014; |
|
|
|
our $VERSION = '0.10'; |
|
|
|
use ksb::Util; |
|
|
|
sub new |
|
{ |
|
my ($class, $module) = @_; |
|
|
|
return bless { module => $module }, $class; |
|
} |
|
|
|
sub name |
|
{ |
|
croak_internal('This package should not be used directly.'); |
|
} |
|
|
|
sub module |
|
{ |
|
my $self = shift; |
|
return $self->{module}; |
|
} |
|
|
|
1;
|
|
|