Revision: 5932 Author: pebender Date: Fri Dec 11 17:24:10 2009 Log: - Updated package utils/coreutils.
http://code.google.com/p/minimyth/source/detail?r=5932 Added: /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.2-disable_man.patch /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.2-perl.patch.gar /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.2-sysinfo.patch Deleted: /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.1-disable_man.patch /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.1-perl.patch.gar /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.1-sysinfo.patch Modified: /trunk/gar-minimyth/html/minimyth/document-changelog.txt /trunk/gar-minimyth/script/utils/coreutils/Makefile /trunk/gar-minimyth/script/utils/coreutils/checksums ======================================= --- /dev/null +++ /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.2-disable_man.patch Fri Dec 11 17:24:10 2009 @@ -0,0 +1,24 @@ +diff -Naur coreutils-8.2-old/Makefile.am coreutils-8.2-new/Makefile.am +--- coreutils-8.2-old/Makefile.am 2009-12-11 17:19:22.000000000 -0800 ++++ coreutils-8.2-new/Makefile.am 2009-12-11 17:20:05.000000000 -0800 +@@ -17,7 +17,7 @@ + + ALL_RECURSIVE_TARGETS = + +-SUBDIRS = lib src doc man po tests gnulib-tests ++SUBDIRS = lib src doc po tests gnulib-tests + + changelog_etc = \ + ChangeLog-2005 \ +diff -Naur coreutils-8.2-old/Makefile.in coreutils-8.2-new/Makefile.in +--- coreutils-8.2-old/Makefile.in 2009-12-11 17:19:22.000000000 -0800 ++++ coreutils-8.2-new/Makefile.in 2009-12-11 17:20:05.000000000 -0800 +@@ -1120,7 +1120,7 @@ + + # Some tests always need root privileges, others need them only sometimes. + ALL_RECURSIVE_TARGETS = install-root check-root distcheck-hook +-SUBDIRS = lib src doc man po tests gnulib-tests ++SUBDIRS = lib src doc po tests gnulib-tests + changelog_etc = \ + ChangeLog-2005 \ + ChangeLog-2006 \ ======================================= --- /dev/null +++ /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.2-perl.patch.gar Fri Dec 11 17:24:10 2009 @@ -0,0 +1,54 @@ +diff -Naur coreutils-8.2-old/build-aux/cvsu coreutils-8.2-new/build-aux/cvsu +--- coreutils-8.2-old/build-aux/cvsu 2009-09-21 05:29:33.000000000 -0700 ++++ coreutils-8.2-new/build-aux/cvsu 2009-12-11 17:18:08.000000000 -0800 +@@ -1,4 +1,4 @@ +-#! /usr/bin/perl -w ++#! @GAR_build_DESTDIR@@GAR_build_bindir@/perl -w + + # cvsu - do a quick check to see what files are out of date. + # +diff -Naur coreutils-8.2-old/man/help2man coreutils-8.2-new/man/help2man +--- coreutils-8.2-old/man/help2man 2009-09-23 01:25:44.000000000 -0700 ++++ coreutils-8.2-new/man/help2man 2009-12-11 17:18:08.000000000 -0800 +@@ -1,4 +1,4 @@ +-#!/usr/bin/perl -w +...@gar_build_destdir@@GAR_build_bindir@/perl -w + + # Generate a short man page from --help and --version output. + # Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2008, 2009 +diff -Naur coreutils-8.2-old/src/dcgen coreutils-8.2-new/src/dcgen +--- coreutils-8.2-old/src/dcgen 2009-09-21 05:29:33.000000000 -0700 ++++ coreutils-8.2-new/src/dcgen 2009-12-11 17:18:08.000000000 -0800 +@@ -1,4 +1,4 @@ +-#!/usr/bin/perl -w +...@gar_build_destdir@@GAR_build_bindir@/perl -w + # dcgen -- convert dircolors.hin to dircolors.h. + + # Copyright (C) 1996, 1998, 2004, 2005, 2006, 2009 Free Software Foundation, Inc. +diff -Naur coreutils-8.2-old/src/extract-magic coreutils-8.2-new/src/extract-magic +--- coreutils-8.2-old/src/extract-magic 2009-09-21 05:29:33.000000000 -0700 ++++ coreutils-8.2-new/src/extract-magic 2009-12-11 17:18:08.000000000 -0800 +@@ -1,4 +1,4 @@ +-#!/usr/bin/perl -w +...@gar_build_destdir@@GAR_build_bindir@/perl -w + # Derive #define directives from specially formatted `case ...:' statements. + + # Copyright (C) 2003, 2005, 2009 Free Software Foundation, Inc. +diff -Naur coreutils-8.2-old/src/wheel-gen.pl coreutils-8.2-new/src/wheel-gen.pl +--- coreutils-8.2-old/src/wheel-gen.pl 2009-09-21 05:29:33.000000000 -0700 ++++ coreutils-8.2-new/src/wheel-gen.pl 2009-12-11 17:18:08.000000000 -0800 +@@ -1,4 +1,4 @@ +-#!/usr/bin/perl -w +...@gar_build_destdir@@GAR_build_bindir@/perl -w + # Generate the spokes of a wheel, for wheel factorization. + + # Copyright (C) 2001, 2005, 2009 Free Software Foundation, Inc. +@@ -16,7 +16,7 @@ + # You should have received a copy of the GNU General Public License + # along with this program. If not, see <http://www.gnu.org/licenses/>. + +-eval 'exec /usr/bin/perl -S $0 ${1+"$@"}' ++eval 'exec @GAR_build_DESTDIR@@GAR_build_bindir@/perl -S $0 ${1+"$@"}' + if 0; + + use strict; ======================================= --- /dev/null +++ /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.2-sysinfo.patch Fri Dec 11 17:24:10 2009 @@ -0,0 +1,56 @@ +diff -Naur coreutils-8.2-old/src/uname.c coreutils-8.2-new/src/uname.c +--- coreutils-8.2-old/src/uname.c 2009-12-11 17:17:49.000000000 -0800 ++++ coreutils-8.2-new/src/uname.c 2009-12-11 17:19:38.000000000 -0800 +@@ -308,6 +308,28 @@ + if (0 <= sysinfo (SI_ARCHITECTURE, processor, sizeof processor)) + element = processor; + } ++#else ++ { ++ struct utsname u; ++ uname(&u); ++ element = u.machine; ++#ifdef linux ++ if(!strcmp(element, "i686")) { /* Check for Athlon */ ++ char cinfo[1024]; ++ FILE *f=fopen("/proc/cpuinfo", "r"); ++ if(f) { ++ while(fgets(cinfo, 1024, f)) { ++ if(!strncmp(cinfo, "vendor_id", 9)) { ++ if(strstr(cinfo, "AuthenticAMD")) ++ element="athlon"; ++ break; ++ } ++ } ++ fclose(f); ++ } ++ } ++#endif ++ } + #endif + #ifdef UNAME_PROCESSOR + if (element == unknown) +@@ -345,7 +367,7 @@ + + if (toprint & PRINT_HARDWARE_PLATFORM) + { +- char const *element = unknown; ++ char *element = unknown; + #if HAVE_SYSINFO && defined SI_PLATFORM + { + static char hardware_platform[257]; +@@ -353,6 +375,14 @@ + hardware_platform, sizeof hardware_platform)) + element = hardware_platform; + } ++#else ++ { ++ struct utsname u; ++ uname(&u); ++ element = u.machine; ++ if(strlen(element)==4 && element[0]=='i' && element[2]=='8' && element[3]=='6') ++ element[1]='3'; ++ } + #endif + #ifdef UNAME_HARDWARE_PLATFORM + if (element == unknown) ======================================= --- /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.1-disable_man.patch Thu Nov 19 08:17:21 2009 +++ /dev/null @@ -1,24 +0,0 @@ -diff -Naur coreutils-8.1-old/Makefile.am coreutils-8.1-new/Makefile.am ---- coreutils-8.1-old/Makefile.am 2009-11-18 17:09:22.000000000 -0800 -+++ coreutils-8.1-new/Makefile.am 2009-11-18 17:12:05.000000000 -0800 -@@ -17,7 +17,7 @@ - - ALL_RECURSIVE_TARGETS = - --SUBDIRS = lib src doc man po tests gnulib-tests -+SUBDIRS = lib src doc po tests gnulib-tests - - changelog_etc = \ - ChangeLog-2005 \ -diff -Naur coreutils-8.1-old/Makefile.in coreutils-8.1-new/Makefile.in ---- coreutils-8.1-old/Makefile.in 2009-11-18 17:09:22.000000000 -0800 -+++ coreutils-8.1-new/Makefile.in 2009-11-18 17:12:05.000000000 -0800 -@@ -1116,7 +1116,7 @@ - - # Some tests always need root privileges, others need them only sometimes. - ALL_RECURSIVE_TARGETS = install-root check-root distcheck-hook --SUBDIRS = lib src doc man po tests gnulib-tests -+SUBDIRS = lib src doc po tests gnulib-tests - changelog_etc = \ - ChangeLog-2005 \ - ChangeLog-2006 \ ======================================= --- /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.1-perl.patch.gar Thu Nov 19 08:17:21 2009 +++ /dev/null @@ -1,568 +0,0 @@ -diff -Naur coreutils-8.1-old/build-aux/announce-gen.orig coreutils-8.1-new/build-aux/announce-gen.orig ---- coreutils-8.1-old/build-aux/announce-gen.orig 1969-12-31 16:00:00.000000000 -0800 -+++ coreutils-8.1-new/build-aux/announce-gen.orig 2009-11-18 17:07:43.000000000 -0800 -@@ -0,0 +1,495 @@ -+eval '(exit $?0)' && eval 'exec perl -wS "$0" ${1+"$@"}' -+ & eval 'exec perl -wS "$0" $argv:q' -+ if 0; -+# Generate a release announcement message. -+ -+my $VERSION = '2009-10-30 15:59'; # UTC -+# The definition above must lie within the first 8 lines in order -+# for the Emacs time-stamp write hook (at end) to update it. -+# If you change this file with Emacs, please let the write hook -+# do its job. Otherwise, update this string manually. -+ -+# Copyright (C) 2002-2009 Free Software Foundation, Inc. -+ -+# This program is free software: you can redistribute it and/or modify -+# it under the terms of the GNU General Public License as published by -+# the Free Software Foundation, either version 3 of the License, or -+# (at your option) any later version. -+ -+# This program is distributed in the hope that it will be useful, -+# but WITHOUT ANY WARRANTY; without even the implied warranty of -+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the -+# GNU General Public License for more details. -+ -+# You should have received a copy of the GNU General Public License -+# along with this program. If not, see <http://www.gnu.org/licenses/>. -+ -+# Written by Jim Meyering -+ -+use strict; -+ -+use Getopt::Long; -+use Digest::MD5; -+use Digest::SHA1; -+use POSIX qw(strftime); -+ -+(my $ME = $0) =~ s|.*/||; -+ -+my %valid_release_types = map {$_ => 1} qw (alpha beta stable); -+my @archive_suffixes = ('tar.gz', 'tar.bz2', 'tar.lzma', 'tar.xz'); -+ -+sub usage ($) -+{ -+ my ($exit_code) = @_; -+ my $STREAM = ($exit_code == 0 ? *STDOUT : *STDERR); -+ if ($exit_code != 0) -+ { -+ print $STREAM "Try `$ME --help' for more information.\n"; -+ } -+ else -+ { -+ my @types = sort keys %valid_release_types; -+ print $STREAM <<EOF; -+Usage: $ME [OPTIONS] -+Generate an announcement message. -+ -+OPTIONS: -+ -+These options must be specified: -+ -+ --release-type=TYPE TYPE must be one of @types -+ --package-name=PACKAGE_NAME -+ --previous-version=VER -+ --current-version=VER -+ --gpg-key-id=ID The GnuPG ID of the key used to sign the tarballs -+ --url-directory=URL_DIR -+ -+The following are optional: -+ -+ --news=NEWS_FILE -+ --bootstrap-tools=TOOL_LIST a comma-separated list of tools, e.g., -+ autoconf,automake,bison,gnulib -+ --gnulib-version=VERSION report VERSION as the gnulib version, where -+ VERSION is the result of running git describe -+ in the gnulib source directory. -+ required if gnulib is in TOOL_LIST. -+ --no-print-checksums do not emit MD5 or SHA1 checksums -+ --archive-suffix=SUF add SUF to the list of archive suffixes -+ -+ --help display this help and exit -+ --version output version information and exit -+ -+EOF -+ } -+ exit $exit_code; -+} -+ -+ -+=item C<%size> = C<sizes (@file)> -+ -+Compute the sizes of the C<@file> and return them as a hash. Return -+C<undef> if one of the computation failed. -+ -+=cut -+ -+sub sizes (@) -+{ -+ my (@file) = @_; -+ -+ my $fail = 0; -+ my %res; -+ foreach my $f (@file) -+ { -+ my $cmd = "du --human $f"; -+ my $t = `$cmd`; -+ # FIXME-someday: give a better diagnostic, a la $PROCESS_STATUS -+ $@ -+ and (warn "$ME: command failed: `$cmd'\n"), $fail = 1; -+ chomp $t; -+ $t =~ s/^([\d.]+[MkK]).*/${1}B/; -+ $res{$f} = $t; -+ } -+ return $fail ? undef : %res; -+} -+ -+=item C<print_locations ($title, \...@url, \%size, @file) -+ -+Print a section C<$title> dedicated to the list of <@file>, which -+sizes are stored in C<%size>, and which are available from the C<@url>. -+ -+=cut -+ -+sub print_locations ($...@\%@) -+{ -+ my ($title, $url, $size, @file) = @_; -+ print "Here are the $title:\n"; -+ foreach my $url (@{$url}) -+ { -+ for my $file (@file) -+ { -+ print " $url/$file"; -+ print " (", $$size{$file}, ")" -+ if exists $$size{$file}; -+ print "\n"; -+ } -+ } -+ print "\n"; -+} -+ -+=item C<print_checksums (@file) -+ -+Print the MD5 and SHA1 signature section for each C<@file>. -+ -+=cut -+ -+sub print_checksums (@) -+{ -+ my (@file) = @_; -+ -+ print "Here are the MD5 and SHA1 checksums:\n"; -+ print "\n"; -+ -+ foreach my $meth (qw (md5 sha1)) -+ { -+ foreach my $f (@file) -+ { -+ open IN, '<', $f -+ or die "$ME: $f: cannot open for reading: $!\n"; -+ binmode IN; -+ my $dig = -+ ($meth eq 'md5' -+ ? Digest::MD5->new->addfile(*IN)->hexdigest -+ : Digest::SHA1->new->addfile(*IN)->hexdigest); -+ close IN; -+ print "$dig $f\n"; -+ } -+ } -+ print "\n"; -+} -+ -+=item C<print_news_deltas ($news_file, $prev_version, $curr_version) -+ -+Print the section of the NEWS file C<$news_file> addressing changes -+between versions C<$prev_version> and C<$curr_version>. -+ -+=cut -+ -+sub print_news_deltas ($$$) -+{ -+ my ($news_file, $prev_version, $curr_version) = @_; -+ -+ print "\n$news_file\n\n"; -+ -+ # Print all lines from $news_file, starting with the first one -+ # that mentions $curr_version up to but not including -+ # the first occurrence of $prev_version. -+ my $in_items; -+ -+ my $re_prefix = qr/(?:\* )?(?:Noteworthy c|Major c|C)(?i:hanges)/; -+ -+ open NEWS, '<', $news_file -+ or die "$ME: $news_file: cannot open for reading: $!\n"; -+ while (defined (my $line = <NEWS>)) -+ { -+ if ( ! $in_items) -+ { -+ # Match lines like these: -+ # * Major changes in release 5.0.1: -+ # * Noteworthy changes in release 6.6 (2006-11-22) [stable] -+ $line =~ /^$re_prefix.*(?:[^\d.]|$)\Q$curr_version\E(?:[^\d.]|$)/o -+ or next; -+ $in_items = 1; -+ print $line; -+ } -+ else -+ { -+ # This regexp must not match version numbers in NEWS items. -+ # For example, they might well say `introduced in 4.5.5', -+ # and we don't want that to match. -+ $line =~ /^$re_prefix.*(?:[^\d.]|$)\Q$prev_version\E(?:[^\d.]|$)/o -+ and last; -+ print $line; -+ } -+ } -+ close NEWS; -+ -+ $in_items -+ or die "$ME: $news_file: no matching lines for `$curr_version'\n"; -+} -+ -+sub print_changelog_deltas ($$) -+{ -+ my ($package_name, $prev_version) = @_; -+ -+ # Print new ChangeLog entries. -+ -+ # First find all CVS-controlled ChangeLog files. -+ use File::Find; -+ my @changelog; -+ find ({wanted => sub {$_ eq 'ChangeLog' && -d 'CVS' -+ and push @changelog, $File::Find::name}}, -+ '.'); -+ -+ # If there are no ChangeLog files, we're done. -+ @changelog -+ or return; -+ my %changelog = map {$_ => 1} @changelog; -+ -+ # Reorder the list of files so that if there are ChangeLog -+ # files in the specified directories, they're listed first, -+ # in this order: -+ my @dir = qw ( . src lib m4 config doc ); -+ -+ # A typical @changelog array might look like this: -+ # ./ChangeLog -+ # ./po/ChangeLog -+ # ./m4/ChangeLog -+ # ./lib/ChangeLog -+ # ./doc/ChangeLog -+ # ./config/ChangeLog -+ my @reordered; -+ foreach my $d (@dir) -+ { -+ my $dot_slash = $d eq '.' ? $d : "./$d"; -+ my $target = "$dot_slash/ChangeLog"; -+ delete $changelog{$target} -+ and push @reordered, $target; -+ } -+ -+ # Append any remaining ChangeLog files. -+ push @reordered, sort keys %changelog; -+ -+ # Remove leading `./'. -+ @reordered = map { s!^\./!!; $_ } @reordered; -+ -+ print "\nChangeLog entries:\n\n"; -+ # print join ("\n", @reordered), "\n"; -+ -+ $prev_version =~ s/\./_/g; -+ my $prev_cvs_tag = "\U$package_name\E-$prev_version"; -+ -+ my $cmd = "cvs -n diff -u -r$prev_cvs_tag -rHEAD @reordered"; -+ open DIFF, '-|', $cmd -+ or die "$ME: cannot run `$cmd': $!\n"; -+ # Print two types of lines, making minor changes: -+ # Lines starting with `+++ ', e.g., -+ # +++ ChangeLog 22 Feb 2003 16:52:51 -0000 1.247 -+ # and those starting with `+'. -+ # Don't print the others. -+ my $prev_printed_line_empty = 1; -+ while (defined (my $line = <DIFF>)) -+ { -+ if ($line =~ /^\+\+\+ /) -+ { -+ my $separator = "*"x70 ."\n"; -+ $line =~ s///; -+ $line =~ s/\s.*//; -+ $prev_printed_line_empty -+ or print "\n"; -+ print $separator, $line, $separator; -+ } -+ elsif ($line =~ /^\+/) -+ { -+ $line =~ s///; -+ print $line; -+ $prev_printed_line_empty = ($line =~ /^$/); -+ } -+ } -+ close DIFF; -+ -+ # The exit code should be 1. -+ # Allow in case there are no modified ChangeLog entries. -+ $? == 256 || $? == 128 -+ or warn "$ME: warning: `cmd' had unexpected exit code or signal ($?)\n"; -+} -+ -+sub get_tool_versions ($$) -+{ -+ my ($tool_list, $gnulib_version) = @_; -+ @$tool_list -+ or return (); -+ -+ my $fail; -+ my @tool_version_pair; -+ foreach my $t (@$tool_list) -+ { -+ if ($t eq 'gnulib') -+ { -+ push @tool_version_pair, ucfirst $t . ' ' . $gnulib_version; -+ next; -+ } -+ # Assume that the last "word" on the first line of -+ # `tool --version` output is the version string. -+ my ($first_line, undef) = split ("\n", `$t --version`); -+ if ($first_line =~ /.* (\d[\w.-]+)$/) -+ { -+ $t = ucfirst $t; -+ push @tool_version_pair, "$t $1"; -+ } -+ else -+ { -+ defined $first_line -+ and $first_line = ''; -+ warn "$ME: $t: unexpected --version output\n:$first_line"; -+ $fail = 1; -+ } -+ } -+ -+ $fail -+ and exit 1; -+ -+ return @tool_version_pair; -+} -+ -+{ -+ # Neutralize the locale, so that, for instance, "du" does not -+ # issue "1,2" instead of "1.2", what confuses our regexps. -+ $ENV{LC_ALL} = "C"; -+ -+ my $release_type; -+ my $package_name; -+ my $prev_version; -+ my $curr_version; -+ my $gpg_key_id; -+ my @url_dir_list; -+ my @news_file; -+ my $bootstrap_tools; -+ my $gnulib_version; -+ my $print_checksums_p = 1; -+ -+ GetOptions -+ ( -+ 'release-type=s' => \$release_type, -+ 'package-name=s' => \$package_name, -+ 'previous-version=s' => \$prev_version, -+ 'current-version=s' => \$curr_version, -+ 'gpg-key-id=s' => \$gpg_key_id, -+ 'url-directory=s' => \...@url_dir_list, -+ 'news=s' => \...@news_file, -+ 'bootstrap-tools=s' => \$bootstrap_tools, -+ 'gnulib-version=s' => \$gnulib_version, -+ 'print-checksums!' => \$print_checksums_p, -+ 'archive-suffix=s' => \...@archive_suffixes, -+ -+ help => sub { usage 0 }, -+ version => sub { print "$ME version $VERSION\n"; exit }, -+ ) or usage 1; -+ -+ my $fail = 0; -+ # Ensure that sure each required option is specified. -+ $release_type -+ or (warn "$ME: release type not specified\n"), $fail = 1; -+ $package_name -+ or (warn "$ME: package name not specified\n"), $fail = 1; -+ $prev_version -+ or (warn "$ME: previous version string not specified\n"), $fail = 1; -+ $curr_version -+ or (warn "$ME: current version string not specified\n"), $fail = 1; -+ $gpg_key_id -+ or (warn "$ME: GnuPG key ID not specified\n"), $fail = 1; -+ @url_dir_list -+ or (warn "$ME: URL directory name(s) not specified\n"), $fail = 1; -+ -+ my @tool_list = split ',', $bootstrap_tools; -+ -+ grep (/^gnulib$/, @tool_list) ^ defined $gnulib_version -+ and (warn "$ME: when specifying gnulib as a tool, you must also specify\n" -+ . "--gnulib-version=V, where V is the result of running git describe\n" -+ . "in the gnulib source directory.\n"), $fail = 1; -+ -+ exists $valid_release_types{$release_type} -+ or (warn "$ME: `$release_type': invalid release type\n"), $fail = 1; -+ -+ @ARGV -+ and (warn "$ME: too many arguments:\n", join ("\n", @ARGV), "\n"), -+ $fail = 1; -+ $fail -+ and usage 1; -+ -+ my $my_distdir = "$package_name-$curr_version"; -+ -+ my $xd = "$package_name-$prev_version-$curr_version.xdelta"; -+ -+ my @candidates = map { "$my_distdir.$_" } @archive_suffixes; -+ my @tarballs = grep {-f $_} @candidates; -+ -+ @tarballs -+ or die "$ME: none of " . join(', ', @candidates) . " were found\n"; -+ my @sizable = @tarballs; -+ -f $xd -+ and push @sizable, $xd; -+ my %size = sizes (@sizable); -+ %size -+ or exit 1; -+ -+ # The markup is escaped as <\# so that when this script is sent by -+ # mail (or part of a diff), Gnus is not triggered. -+ print <<EOF; -+ -+Subject: $my_distdir released [$release_type] -+ -+<\#secure method=pgpmime mode=sign> -+ -+FIXME: put comments here -+ -+EOF -+ -+ print_locations ("compressed sources", @url_dir_list, %size, @tarballs); -+ -f $xd -+ and print_locations ("xdelta diffs (useful? if so, " -+ . "please tell [email protected])", -+ @url_dir_list, %size, $xd); -+ my @sig_files = map { "$_.sig" } @tarballs; -+ print_locations ("GPG detached signatures[*]", @url_dir_list, %size, -+ @sig_files); -+ -+ $print_checksums_p -+ and print_checksums (@sizable); -+ -+ print <<EOF; -+[*] You can use either of the above signature files to verify that -+the corresponding file (without the .sig suffix) is intact. First, -+be sure to download both the .sig file and the corresponding tarball. -+Then, run a command like this: -+ -+ gpg --verify $tarballs[0].sig -+ -+If that command fails because you don't have the required public key, -+then run this command to import it: -+ -+ gpg --keyserver keys.gnupg.net --recv-keys $gpg_key_id -+ -+and rerun the \`gpg --verify' command. -+EOF -+ -+ my @tool_versions = get_tool_versions (\...@tool_list, $gnulib_version); -+ @tool_versions -+ and print "\nThis release was bootstrapped with the following tools:", -+ join ('', map {"\n $_"} @tool_versions), "\n"; -+ -+ print_news_deltas ($_, $prev_version, $curr_version) -+ foreach @news_file; -+ -+ $release_type eq 'stable' -+ or print_changelog_deltas ($package_name, $prev_version); -+ -+ exit 0; -+} -+ -+### Setup "GNU" style for perl-mode and cperl-mode. -+## Local Variables: -+## mode: perl -+## perl-indent-level: 2 -+## perl-continued-statement-offset: 2 -+## perl-continued-brace-offset: 0 -+## perl-brace-offset: 0 -+## perl-brace-imaginary-offset: 0 -+## perl-label-offset: -2 -+## perl-extra-newline-before-brace: t -+## perl-merge-trailing-else: nil -+## eval: (add-hook 'write-file-hooks 'time-stamp) -+## time-stamp-start: "my $VERSION = '" -+## time-stamp-format: "%:y-%02m-%02d %02H:%02M" -+## time-stamp-time-zone: "UTC" -+## time-stamp-end: "'; # UTC" -+## End: -diff -Naur coreutils-8.1-old/build-aux/announce-gen.rej coreutils-8.1-new/build-aux/announce-gen.rej ---- coreutils-8.1-old/build-aux/announce-gen.rej 1969-12-31 16:00:00.000000000 -0800 -+++ coreutils-8.1-new/build-aux/announce-gen.rej 2009-11-18 17:07:56.000000000 -0800 -@@ -0,0 +1,11 @@ -+*************** -+*** 1,4 **** -+- #!/usr/bin/perl -w -+ # Generate a release announcement message. -+ -+ my $VERSION = '2009-09-01 06:47'; # UTC -+--- 1,4 ---- -++ #...@gar_build_destdir@@GAR_build_bindir@/perl -w -+ # Generate a release announcement message. -+ -+ my $VERSION = '2009-09-01 06:47'; # UTC -diff -Naur coreutils-8.1-old/build-aux/cvsu coreutils-8.1-new/build-aux/cvsu ---- coreutils-8.1-old/build-aux/cvsu 2009-09-21 05:29:33.000000000 -0700 -+++ coreutils-8.1-new/build-aux/cvsu 2009-11-18 17:07:56.000000000 -0800 -@@ -1,4 +1,4 @@ --#! /usr/bin/perl -w -+#! @GAR_build_DESTDIR@@GAR_build_bindir@/perl -w - - # cvsu - do a quick check to see what files are out of date. - # -diff -Naur coreutils-8.1-old/man/help2man coreutils-8.1-new/man/help2man ---- coreutils-8.1-old/man/help2man 2009-09-23 01:25:44.000000000 -0700 -+++ coreutils-8.1-new/man/help2man 2009-11-18 17:07:56.000000000 -0800 -@@ -1,4 +1,4 @@ --#!/usr/bin/perl -w -...@gar_build_destdir@@GAR_build_bindir@/perl -w - - # Generate a short man page from --help and --version output. - # Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2008, 2009 -diff -Naur coreutils-8.1-old/src/dcgen coreutils-8.1-new/src/dcgen ---- coreutils-8.1-old/src/dcgen 2009-09-21 05:29:33.000000000 -0700 -+++ coreutils-8.1-new/src/dcgen 2009-11-18 17:07:56.000000000 -0800 -@@ -1,4 +1,4 @@ --#!/usr/bin/perl -w -...@gar_build_destdir@@GAR_build_bindir@/perl -w - # dcgen -- convert dircolors.hin to dircolors.h. - - # Copyright (C) 1996, 1998, 2004, 2005, 2006, 2009 Free Software Foundation, Inc. -diff -Naur coreutils-8.1-old/src/extract-magic coreutils-8.1-new/src/extract-magic ---- coreutils-8.1-old/src/extract-magic 2009-09-21 05:29:33.000000000 -0700 -+++ coreutils-8.1-new/src/extract-magic 2009-11-18 17:07:56.000000000 -0800 -@@ -1,4 +1,4 @@ --#!/usr/bin/perl -w -...@gar_build_destdir@@GAR_build_bindir@/perl -w - # Derive #define directives from specially formatted `case ...:' statements. - - # Copyright (C) 2003, 2005, 2009 Free Software Foundation, Inc. -diff -Naur coreutils-8.1-old/src/wheel-gen.pl coreutils-8.1-new/src/wheel-gen.pl ---- coreutils-8.1-old/src/wheel-gen.pl 2009-09-21 05:29:33.000000000 -0700 -+++ coreutils-8.1-new/src/wheel-gen.pl 2009-11-18 17:07:56.000000000 -0800 -@@ -1,4 +1,4 @@ --#!/usr/bin/perl -w -...@gar_build_destdir@@GAR_build_bindir@/perl -w - # Generate the spokes of a wheel, for wheel factorization. - - # Copyright (C) 2001, 2005, 2009 Free Software Foundation, Inc. -@@ -16,7 +16,7 @@ - # You should have received a copy of the GNU General Public License - # along with this program. If not, see <http://www.gnu.org/licenses/>. - --eval 'exec /usr/bin/perl -S $0 ${1+"$@"}' -+eval 'exec @GAR_build_DESTDIR@@GAR_build_bindir@/perl -S $0 ${1+"$@"}' - if 0; - - use strict; ======================================= --- /trunk/gar-minimyth/script/utils/coreutils/files/coreutils-8.1-sysinfo.patch Thu Nov 19 08:17:21 2009 +++ /dev/null @@ -1,56 +0,0 @@ -diff -Naur coreutils-8.1-old/src/uname.c coreutils-8.1-new/src/uname.c ---- coreutils-8.1-old/src/uname.c 2009-11-18 17:07:43.000000000 -0800 -+++ coreutils-8.1-new/src/uname.c 2009-11-18 17:11:21.000000000 -0800 -@@ -308,6 +308,28 @@ - if (0 <= sysinfo (SI_ARCHITECTURE, processor, sizeof processor)) - element = processor; - } -+#else -+ { -+ struct utsname u; -+ uname(&u); -+ element = u.machine; -+#ifdef linux -+ if(!strcmp(element, "i686")) { /* Check for Athlon */ -+ char cinfo[1024]; -+ FILE *f=fopen("/proc/cpuinfo", "r"); -+ if(f) { -+ while(fgets(cinfo, 1024, f)) { -+ if(!strncmp(cinfo, "vendor_id", 9)) { -+ if(strstr(cinfo, "AuthenticAMD")) -+ element="athlon"; -+ break; -+ } -+ } -+ fclose(f); -+ } -+ } -+#endif -+ } - #endif - #ifdef UNAME_PROCESSOR - if (element == unknown) -@@ -345,7 +367,7 @@ - - if (toprint & PRINT_HARDWARE_PLATFORM) - { -- char const *element = unknown; -+ char *element = unknown; - #if HAVE_SYSINFO && defined SI_PLATFORM - { - static char hardware_platform[257]; -@@ -353,6 +375,14 @@ - hardware_platform, sizeof hardware_platform)) - element = hardware_platform; - } -+#else -+ { -+ struct utsname u; -+ uname(&u); -+ element = u.machine; -+ if(strlen(element)==4 && element[0]=='i' && element[2]=='8' && element[3]=='6') -+ element[1]='3'; -+ } - #endif - #ifdef UNAME_HARDWARE_PLATFORM - if (element == unknown) ======================================= --- /trunk/gar-minimyth/html/minimyth/document-changelog.txt Thu Dec 10 21:05:34 2009 +++ /trunk/gar-minimyth/html/minimyth/document-changelog.txt Fri Dec 11 17:24:10 2009 @@ -5,7 +5,7 @@ MiniMyth release. For earlier changes see the yearly changelog files. -------------------------------------------------------------------------------- -Changes since 72 (2009-12-10): +Changes since 72 (2009-12-11): Current MythTV versions MythTV 0.20-softpad: version 0.20.2.softpad, release-0-20-fixes branch svn 16082 and ======================================= --- /trunk/gar-minimyth/script/utils/coreutils/Makefile Thu Nov 19 08:17:21 2009 +++ /trunk/gar-minimyth/script/utils/coreutils/Makefile Fri Dec 11 17:24:10 2009 @@ -1,5 +1,5 @@ GARNAME = coreutils -GARVERSION = 8.1 +GARVERSION = 8.2 CATEGORIES = utils MASTER_SITES = ftp://ftp.gnu.org/gnu/$(GARNAME)/ DISTFILES = $(DISTNAME).tar.gz ======================================= --- /trunk/gar-minimyth/script/utils/coreutils/checksums Thu Nov 19 08:17:21 2009 +++ /trunk/gar-minimyth/script/utils/coreutils/checksums Fri Dec 11 17:24:10 2009 @@ -1,4 +1,4 @@ -4cde9f31604f4da188ed302ca55545ea download/coreutils-8.1.tar.gz -11e555eb1d5cef69f4dbe7d3000eae29 download/coreutils-8.1-perl.patch.gar -a3c32c7d9373938ef6fb47570f7b5242 download/coreutils-8.1-sysinfo.patch -78e01e50502a1a2dbc34641cadad0be4 download/coreutils-8.1-disable_man.patch +dfb0d3dbc5f555386339f4f74621cda0 download/coreutils-8.2.tar.gz +623e8a577effbe7e7b39c5356816fecc download/coreutils-8.2-perl.patch.gar +112fb2a8705e2f600f121afeb5fc7e99 download/coreutils-8.2-sysinfo.patch +08aa453cb135c569a756ead7aba5e920 download/coreutils-8.2-disable_man.patch -- You received this message because you are subscribed to the Google Groups "minimyth-commits" group. To post to this group, send email to [email protected]. To unsubscribe from this group, send email to [email protected]. For more options, visit this group at http://groups.google.com/group/minimyth-commits?hl=en.
