← Back to branch summary

~swt-techie/ubuntu/vivid/ddclient/merge-debian-3.8.2

« back to all changes in this revision

Viewing changes to ddclient

  • Committer: Scott Talbert
  • Date: 2014-12-07 04:15:45 UTC
  • Revision ID: swt@techie.net-20141207041545-quw7nvkxo4s72igd
Add patch from upstream which enables ddclient to find Digest::SHA to
fix FreeDNS support (LP: #1068884)

Show diffs side-by-side

added added

removed removed

Lines of Context:
ddclient
1784
1784
######################################################################
1785
1785
sub load_sha1_support {
1786
1786
    my $sha1_loaded = eval {require Digest::SHA1};
1787
 
    unless ($sha1_loaded) {
 
1787
    my $sha_loaded = eval {require Digest::SHA};
 
1788
    unless ($sha1_loaded || $sha_loaded) {
1788
1789
        fatal(<<"EOM");
1789
 
Error loading the Perl module Digest::SHA1 needed for freedns update.
1790
 
On Debian, the package libdigest-sha1-perl must be installed.
 
1790
Error loading the Perl module Digest::SHA1 or Digest::SHA needed for freedns update.
 
1791
On Debian, the package libdigest-sha1-perl or libdigest-sha-perl must be installed.
1791
1792
EOM
1792
1793
    }
1793
 
    import  Digest::SHA1 (qw/sha1_hex/);
 
1794
    if($sha1_loaded) {
 
1795
        import  Digest::SHA1 (qw/sha1_hex/);
 
1796
    } elsif($sha_loaded) {
 
1797
        import  Digest::SHA (qw/sha1_hex/);
 
1798
    }
1794
1799
}
1795
1800
######################################################################
1796
1801
## geturl