Update to current Debian version.
Signed-off-by: Thomas Hochstein <thh@thh.name>
This commit is contained in:
parent
1674138be6
commit
8259e05504
5 changed files with 6 additions and 4 deletions
|
|
@ -21,7 +21,7 @@ use DBI();
|
|||
use MOD::Utils qw(read_private_config);
|
||||
use News::Article();
|
||||
use MOD::DBIUtilsPublic();
|
||||
use Digest::SHA1();
|
||||
use Digest::SHA();
|
||||
|
||||
push @MOD::DBIUtils::ISA,'MOD::DBIUtilsPublic';
|
||||
|
||||
|
|
@ -81,7 +81,7 @@ sub enter_table($$$$)
|
|||
my $article_id = undef;
|
||||
|
||||
my $age = $self->{'config'}->{'check_duplicates_age'} || 7;
|
||||
my $sha1 = Digest::SHA1::sha1_hex($body);
|
||||
my $sha1 = Digest::SHA::sha1_hex($body);
|
||||
my $stmt = $self->{'dbh'}->prepare(
|
||||
"SELECT id\n" .
|
||||
"\nFROM " . $table .
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue