Hello community,
here is the log from the commit of package perl-Sys-Hostname-Long for
openSUSE:Factory checked in at 2015-02-11 16:31:47
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Sys-Hostname-Long (Old)
and /work/SRC/openSUSE:Factory/.perl-Sys-Hostname-Long.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Sys-Hostname-Long"
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-Sys-Hostname-Long/perl-Sys-Hostname-Long.changes
2013-03-27 19:32:38.000000000 +0100
+++
/work/SRC/openSUSE:Factory/.perl-Sys-Hostname-Long.new/perl-Sys-Hostname-Long.changes
2015-02-11 16:31:49.000000000 +0100
@@ -1,0 +2,6 @@
+Sat Feb 7 16:23:00 UTC 2015 - [email protected]
+
+- updated to 1.5
+ Improvements by Michiel Bejen <[email protected]>
+
+-------------------------------------------------------------------
Old:
----
Sys-Hostname-Long-1.4.tar.gz
New:
----
Sys-Hostname-Long-1.5.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Sys-Hostname-Long.spec ++++++
--- /var/tmp/diff_new_pack.SZy0Ei/_old 2015-02-11 16:31:50.000000000 +0100
+++ /var/tmp/diff_new_pack.SZy0Ei/_new 2015-02-11 16:31:50.000000000 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-Sys-Hostname-Long
#
-# Copyright (c) 2013 SUSE LINUX Products GmbH, Nuernberg, Germany.
+# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany.
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -17,31 +17,31 @@
Name: perl-Sys-Hostname-Long
+Version: 1.5
+Release: 0
%define cpan_name Sys-Hostname-Long
Summary: Try every conceivable way to get full hostname
License: Artistic-1.0 or GPL-1.0+
Group: Development/Libraries/Perl
-Version: 1.4
-Release: 0
Url: http://search.cpan.org/dist/Sys-Hostname-Long/
-Source:
http://search.cpan.org/CPAN/authors/id/S/SC/SCOTT/Sys-Hostname-Long-1.4.tar.gz
+Source:
http://www.cpan.org/authors/id/S/SC/SCOTT/%{cpan_name}-%{version}.tar.gz
+BuildArch: noarch
BuildRoot: %{_tmppath}/%{name}-%{version}-build
-%{perl_requires}
BuildRequires: perl
-%if 0%{?suse_version} && 0%{?suse_version} <= 1210
BuildRequires: perl-macros
-%endif
+%{perl_requires}
%description
-How to get the host full name in perl on multiple operating systems
-(mac, windows, unix* etc)
+How to get the host full name in perl on multiple operating systems (mac,
+windows, unix* etc)
%prep
-%setup -n %{cpan_name}-%{version}
+%setup -q -n %{cpan_name}-%{version}
+find . -type f -print0 | xargs -0 chmod 644
%build
-%{__perl} Makefile.PL
-%{__make}
+%{__perl} Makefile.PL INSTALLDIRS=vendor
+%{__make} %{?_smp_mflags}
%check
%{__make} test
@@ -51,11 +51,8 @@
%perl_process_packlist
%perl_gen_filelist
-%clean
-%{__rm} -rf $RPM_BUILD_ROOT
-
%files -f %{name}.files
-%defattr(-, root, root, 0755)
+%defattr(-,root,root,755)
%doc Changes README
%changelog
++++++ Sys-Hostname-Long-1.4.tar.gz -> Sys-Hostname-Long-1.5.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Hostname-Long-1.4/Changes
new/Sys-Hostname-Long-1.5/Changes
--- old/Sys-Hostname-Long-1.4/Changes 2005-06-26 00:34:25.000000000 +0200
+++ new/Sys-Hostname-Long-1.5/Changes 2015-01-13 12:02:10.000000000 +0100
@@ -9,3 +9,6 @@
1.4 Sun Jun 26 08:14:13 2005
Damn... forgot something...
+
+1.5 Tue Jan 13 22:01:31 AEDT 2015
+ Improvements by Michiel Bejen <[email protected]>
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Hostname-Long-1.4/MANIFEST
new/Sys-Hostname-Long-1.5/MANIFEST
--- old/Sys-Hostname-Long-1.4/MANIFEST 2005-06-26 00:17:37.000000000 +0200
+++ new/Sys-Hostname-Long-1.5/MANIFEST 2015-01-13 12:04:49.000000000 +0100
@@ -6,3 +6,4 @@
testall.pl
lib/Sys/Hostname/Long.pm
META.yml Module meta-data (added by MakeMaker)
+META.json Module JSON meta-data (added by
MakeMaker)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Hostname-Long-1.4/META.json
new/Sys-Hostname-Long-1.5/META.json
--- old/Sys-Hostname-Long-1.4/META.json 1970-01-01 01:00:00.000000000 +0100
+++ new/Sys-Hostname-Long-1.5/META.json 2015-01-13 12:04:49.000000000 +0100
@@ -0,0 +1,44 @@
+{
+ "abstract" : "Try every conceivable way to get full hostname",
+ "author" : [
+ "Scott Penrose <[email protected]>"
+ ],
+ "dynamic_config" : 1,
+ "generated_by" : "ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter
version 2.120921",
+ "license" : [
+ "perl_5"
+ ],
+ "meta-spec" : {
+ "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";,
+ "version" : "2"
+ },
+ "name" : "Sys-Hostname-Long",
+ "no_index" : {
+ "directory" : [
+ "t",
+ "inc"
+ ]
+ },
+ "prereqs" : {
+ "build" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
+ "configure" : {
+ "requires" : {
+ "ExtUtils::MakeMaker" : "0"
+ }
+ },
+ "runtime" : {
+ "requires" : {}
+ }
+ },
+ "release_status" : "stable",
+ "resources" : {
+ "repository" : {
+ "url" : "https://github.com/scottp/sys-hostname-long/";
+ }
+ },
+ "version" : "1.5"
+}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Hostname-Long-1.4/META.yml
new/Sys-Hostname-Long-1.5/META.yml
--- old/Sys-Hostname-Long-1.4/META.yml 2005-06-26 00:34:34.000000000 +0200
+++ new/Sys-Hostname-Long-1.5/META.yml 2015-01-13 12:04:49.000000000 +0100
@@ -1,10 +1,23 @@
-# http://module-build.sourceforge.net/META-spec.html
-#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
-name: Sys-Hostname-Long
-version: 1.4
-version_from: lib/Sys/Hostname/Long.pm
-installdirs: site
-requires:
-
-distribution_type: module
-generated_by: ExtUtils::MakeMaker version 6.17
+---
+abstract: 'Try every conceivable way to get full hostname'
+author:
+ - 'Scott Penrose <[email protected]>'
+build_requires:
+ ExtUtils::MakeMaker: 0
+configure_requires:
+ ExtUtils::MakeMaker: 0
+dynamic_config: 1
+generated_by: 'ExtUtils::MakeMaker version 6.66, CPAN::Meta::Converter version
2.120921'
+license: perl
+meta-spec:
+ url: http://module-build.sourceforge.net/META-spec-v1.4.html
+ version: 1.4
+name: Sys-Hostname-Long
+no_index:
+ directory:
+ - t
+ - inc
+requires: {}
+resources:
+ repository: https://github.com/scottp/sys-hostname-long/
+version: 1.5
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Hostname-Long-1.4/Makefile.PL
new/Sys-Hostname-Long-1.5/Makefile.PL
--- old/Sys-Hostname-Long-1.4/Makefile.PL 2001-08-26 23:53:41.000000000
+0200
+++ new/Sys-Hostname-Long-1.5/Makefile.PL 2015-01-13 11:58:13.000000000
+0100
@@ -1,9 +1,15 @@
use ExtUtils::MakeMaker;
WriteMakefile(
'NAME' => 'Sys::Hostname::Long',
- 'VERSION_FROM' => 'lib/Sys/Hostname/Long.pm',
+ 'VERSION_FROM' => 'lib/Sys/Hostname/Long.pm',
'PREREQ_PM' => {}, # e.g., Module::Name => 1.1
($] >= 5.005 ? ## Add these new keywords supported since 5.005
(ABSTRACT_FROM => 'lib/Sys/Hostname/Long.pm', # retrieve abstract from
module
AUTHOR => 'Scott Penrose <[email protected]>') : ()),
+ 'LICENSE' => 'perl',
+ 'META_MERGE' => {
+ resources => {
+ repository => 'https://github.com/scottp/sys-hostname-long/',
+ },
+ },
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Sys-Hostname-Long-1.4/lib/Sys/Hostname/Long.pm
new/Sys-Hostname-Long-1.5/lib/Sys/Hostname/Long.pm
--- old/Sys-Hostname-Long-1.4/lib/Sys/Hostname/Long.pm 2005-06-26
00:34:10.000000000 +0200
+++ new/Sys-Hostname-Long-1.5/lib/Sys/Hostname/Long.pm 2015-01-13
12:04:33.000000000 +0100
@@ -11,7 +11,7 @@
# Use perl < 5.6 compatible methods for now, change to 'our' soon.
use vars qw(@EXPORT $VERSION $hostlong %dispatch $lastdispatch);
@EXPORT = qw/ hostname_long /;
-$VERSION = '1.4';
+$VERSION = '1.5';
%dispatch = (
@@ -39,13 +39,13 @@
'exec' => sub {
return eval q{
use Win32::TieRegistry ( TiedHash =>
'%RegistryHash' );
-
$RegistryHash{'LMachine'}{'System'}{'CurrentControlSet'}{'Services'}{'VxD'}{'MSTCP'}{'Domain'};
+
$RegistryHash{'LMachine'}{'System'}{'CurrentControlSet'}{'Services'}{'VxD'}{'MSTCP'}{'Domain'};
};
},
},
'uname' => {
- 'title' => 'POSIX::unae',
+ 'title' => 'POSIX::uname',
'description' => '',
'exec' => sub {
return eval {
@@ -63,7 +63,7 @@
'exec' => sub {
return eval q{
use Win32::TieRegistry ( TiedHash =>
'%RegistryHash' );
-
$RegistryHash{'LMachine'}{'System'}{'CurrentControlSet'}{'Services'}{'VxD'}{'MSTCP'}{'Domain'};
+
$RegistryHash{'LMachine'}{'System'}{'CurrentControlSet'}{'Services'}{'VxD'}{'MSTCP'}{'Domain'};
};
},
},
@@ -73,13 +73,16 @@
'description' => '',
'exec' => sub {
# Skip for Solaris, and only run as non-root
+ # Skip for darwin (Mac OS X), RT#28894
my $tmp;
- if ($< == 0) {
- $tmp = `su nobody -c "hostname --fqdn"`;
- } else {
- $tmp = `hostname --fqdn`;
+ if ( $^O ne 'darwin' ) {
+ if ($< == 0) {
+ $tmp = `su nobody -c "hostname --fqdn"`;
+ } else {
+ $tmp = `hostname --fqdn`;
+ }
+ $tmp =~ tr/\0\r\n//d;
}
- $tmp =~ tr/\0\r\n//d;
return $tmp;
},
},
@@ -162,10 +165,10 @@
unless ($hostlong =~ m|.*\..*|) {
if ($^O eq 'MacOS') {
- # http://bumppo.net/lists/macperl/1999/03/msg00282.html
+ # http://bumppo.net/lists/macperl/1999/03/msg00282.html
# suggests that it will work (checking localhost)
on both
- # Mac and Windows.
- # Personally this makes no sense what so ever as
+ # Mac and Windows.
+ # Personally this makes no sense what so ever as
$hostlong = dispatcher('gethostbyname');
} elsif ($^O eq 'IRIX') { # XXX Patter match string !
@@ -185,7 +188,7 @@
} elsif ($^O eq 'solaris') {
$hostlong = dispatcher('exec_hostname_domainname');
-
+
} else {
$hostlong = dispatcher('exec_hostname_fqdn');
}
@@ -258,11 +261,11 @@
FreeBSD FreeBSD OK
A new list has now been compiled of all the operating systems so that I can
-individually keep informaiton on their success.
+individually keep information on their success.
THIS IS IN NEED OF AN UPDATE AFTER NEXT RELEASE.
-=over 4
+=over 4
=item Acorn - Not yet tested
@@ -316,7 +319,7 @@
=item JPerl - Not yet tested
-=item Linux
+=item Linux
=over 8
@@ -476,7 +479,7 @@
=head2 Unix
-Most unix systems have trouble working out the fully quallified domain name as
+Most unix systems have trouble working out the fully qualified domain name as
it to be configured somewhere in the system correctly. For example in most
linux systems (debian, ?) the fully qualified name should be the first entry
next to the ip number in /etc/hosts
@@ -509,11 +512,14 @@
=head1 AUTHOR
-Scott Penrose E<lt>F<[email protected]>E<gt>
+Originally by Scott Penrose E<lt>F<[email protected]>E<gt>
+
+Contributions: Michiel Beijen E<lt>F<[email protected]>E<gt>
+
=head1 COPYRIGHT
-Copyright (c) 2001,2004,2005 Scott Penrose. All rights reserved.
+Copyright (c) 2001,2004,2005,2015 Scott Penrose. All rights reserved.
This program is free software; you can redistribute it and/or modify
it under the same terms as Perl itself.
--
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
