pilot-link/pilot-link-0.11.0-perlmd5.patch
cvsdist bcfb1cfa4e auto-import changelog data from pilot-link-0.11.2-1.src.rpm
Tue Aug 06 2002 Than Ngo <than@redhat.com> 0.11.2-1
- 0.11.2 (bug #70889)
- add missing static library
Mon Jul 22 2002 Tim Powers <timp@redhat.com> 0.11.0-4
- rebuild using gcc-3.2-0.1
Thu Jul 18 2002 Tim Powers <timp@redhat.com> 0.11.0-3
- add %{_libdir}/libpisock++.so and %{_libdir}/libpisock++.so.* to the file
    lists to fix the broken deps
Thu Jul 18 2002 Than Ngo <than@redhat.com> 0.11.0-2
- Added missing some symlinks
Thu Jul 18 2002 Than Ngo <than@redhat.com> 0.11.0-1
- 0.11.0 (bug #69135)
- Adapted patches into 0.11.0
Fri Jun 21 2002 Tim Powers <timp@redhat.com>
- automated rebuild
Wed Jun 19 2002 Than Ngo <than@redhat.com> 0.9.5-19
- don't forcibly strip binaries
Tue Jun 11 2002 Than Ngo <than@redhat.com> 0.9.5-18
- get rid of tcl/tk dependency (bug #66480)
Wed Jun 05 2002 Than Ngo <than@redhat.com> 0.9.5-17
- add rpmlint filter rpmlint bug #66008
- add malsync-supporting bug #64882
Thu May 23 2002 Tim Powers <timp@redhat.com>
- automated rebuild
2004-09-09 10:29:29 +00:00

39 lines
898 B
Diff

--- pilot-link.0.9.5/src/sync-plan.PL.md5 Wed May 29 11:08:47 2002
+++ pilot-link.0.9.5/src/sync-plan.PL Wed May 29 11:09:03 2002
@@ -6,7 +6,7 @@
use IO::Socket;
use IO::Select;
use Time::Local;
-use MD5;
+use Digest::MD5;
use PDA::Pilot;
sub DatePlanToPerl {
@@ -313,7 +313,7 @@
}
}
- my($hash) = new MD5;
+ my($hash) = new Digest::MD5;
foreach (@output) {
#print "Adding |$_| to hash\n";
$hash->add($_);
@@ -490,7 +490,7 @@
my(@l) = split(/\n/,$r);
my($rec) = { raw => [@l], other => [] };
my(@E,@R,@N,@M,@S,@US);
- my($hash) = new MD5;
+ my($hash) = new Digest::MD5;
$l[0] =~ s/\s+/ /g;
$hash->add($l[0]);
my($date, $time, $length, $early, $late, $flags, $color) = split(/\s+/, shift @l);
@@ -566,7 +566,7 @@
sub HashPilotRecord {
my($record) = @_;
- my($hash) = new MD5;
+ my($hash) = new Digest::MD5;
$hash->add($record->{raw});
$hash->hexdigest;
}