Go to:
Gentoo Home
Documentation
Forums
Lists
Bugs
Planet
Store
Wiki
Get Gentoo!
Gentoo's Bugzilla – Attachment 7115 Details for
Bug 3450
CPAN in Gentoo?
Home
|
New
–
[Ex]
|
Browse
|
Search
|
Privacy Policy
|
[?]
|
Reports
|
Requests
|
Help
|
New Account
|
Log In
[x]
|
Forgot Password
Login:
[x]
[patch]
Patch against my previous attachment.
nomd5.txt (text/plain), 1.43 KB, created by
J Robert Ray
on 2003-01-08 23:22:07 UTC
(
hide
)
Description:
Patch against my previous attachment.
Filename:
MIME Type:
Creator:
J Robert Ray
Created:
2003-01-08 23:22:07 UTC
Size:
1.43 KB
patch
obsolete
>--- g-cpan.pl 2003-01-08 19:57:48.000000000 -0800 >+++ g-cpan2.pl 2003-01-08 21:20:02.000000000 -0800 >@@ -5,6 +5,8 @@ > # > # History: > >+# 01/08/03: jrray@gentoo.org: remove dependency on Digest::MD5 >+# > # 01/07/03: jrray@gentoo.org: getting the way subroutines are fed variables > # sorted out (they're in @_) > # Clean out module_check, unnecessary temp variables are evil. >@@ -47,7 +49,8 @@ > use File::Spec; > use File::Path; > use CPAN; >-use Digest::MD5; >+eval 'use Digest::MD5;'; >+my $have_digestmd5 = $@ ? 0 : 1; > > # output error if no arguments > unless (@ARGV) { >@@ -241,16 +244,17 @@ > my $localfile = $pack->{localfile}; > ( my $base = $file ) =~ s/.*\/(.*)/$1/; > >+ my $md5digest; >+ if ($have_digestmd5) { > open( DIGIFILE, $localfile ) or die "Can't open '$file': $!"; > binmode(DIGIFILE); >- >- my $md5digest = Digest::MD5->new; >- while (<DIGIFILE>) { >- $md5digest->add($_); >- } >+ $md5digest = Digest::MD5->new->addfile(*DIGIFILE)->hexdigest; > close(DIGIFILE); >+ } else { >+ ($md5digest = qx(/usr/bin/md5sum $localfile)) =~ s/^(.*?)\s.*$/$1/s; >+ } > >- my $md5string = sprintf "MD5 %s %s %d", $md5digest->hexdigest, $base, >+ my $md5string = sprintf "MD5 %s %s %d", $md5digest, $base, > -s $localfile; > > # make ebuilds for all the prereqs >@@ -260,7 +264,6 @@ > create_ebuild( $obj, $dir, $file, $prereq_pm, $md5string ); > > push @ebuild_list, $dir; >- > } > > sub clean_up {
You cannot view the attachment while viewing its details because your browser does not support IFRAMEs.
View the attachment on a separate page
.
View Attachment As Diff
View Attachment As Raw
Actions:
View
|
Diff
Attachments on
bug 3450
:
2089
|
2090
|
2091
|
2276
|
5443
|
6171
|
6252
|
6274
|
6286
|
6352
|
7081
| 7115