Hello community, here is the log from the commit of package perl-Sysadm-Install for openSUSE:Factory checked in at 2016-11-18 22:02:35 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Sysadm-Install (Old) and /work/SRC/openSUSE:Factory/.perl-Sysadm-Install.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Sysadm-Install" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Sysadm-Install/perl-Sysadm-Install.changes 2016-06-05 14:20:47.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Sysadm-Install.new/perl-Sysadm-Install.changes 2016-11-18 22:02:36.000000000 +0100 @@ -1,0 +2,11 @@ +Thu Nov 17 07:13:14 UTC 2016 - co...@suse.com + +- updated to 0.48 + see /usr/share/doc/packages/perl-Sysadm-Install/Changes + + 0.48 (2016/11/15) + (ms) Applied typo fix submitted by Salvatore Bonaccorso in + [rt.cpan.org #114826] + (ms) Reopening stderr now after password_read prompt to tty closed it. + +------------------------------------------------------------------- Old: ---- Sysadm-Install-0.47.tar.gz New: ---- Sysadm-Install-0.48.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Sysadm-Install.spec ++++++ --- /var/tmp/diff_new_pack.dxAjYg/_old 2016-11-18 22:02:37.000000000 +0100 +++ /var/tmp/diff_new_pack.dxAjYg/_new 2016-11-18 22:02:37.000000000 +0100 @@ -17,7 +17,7 @@ Name: perl-Sysadm-Install -Version: 0.47 +Version: 0.48 Release: 0 %define cpan_name Sysadm-Install Summary: Typical installation tasks for system administrators ++++++ Sysadm-Install-0.47.tar.gz -> Sysadm-Install-0.48.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sysadm-Install-0.47/Changes new/Sysadm-Install-0.48/Changes --- old/Sysadm-Install-0.47/Changes 2016-05-30 09:08:30.000000000 +0200 +++ new/Sysadm-Install-0.48/Changes 2016-11-16 07:32:21.000000000 +0100 @@ -2,10 +2,16 @@ Revision history for Sysadm::Install ######################################## +0.48 (2016/11/15) + (ms) Applied typo fix submitted by Salvatore Bonaccorso in + [rt.cpan.org #114826] + (ms) Reopening stderr now after password_read prompt to tty closed it. + 0.47 (2016/05/29) - (ms) password_read() now writes the prompt to STDERR (instead of STDOUT), and - optionally to /dev/tty if specified. This allows for redirecting STDOUT - (and even STDERR) to a file without losing the password prompt. + (ms) password_read() now writes the prompt to STDERR (instead of STDOUT), + and optionally to /dev/tty if specified. This allows for + redirecting STDOUT (and even STDERR) to a file without losing + the password prompt. 0.46 (2015/06/23) (ms) ask() and pick() now support getting the user's response on the diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sysadm-Install-0.47/META.json new/Sysadm-Install-0.48/META.json --- old/Sysadm-Install-0.47/META.json 2016-05-30 09:27:18.000000000 +0200 +++ new/Sysadm-Install-0.48/META.json 2016-11-16 07:33:35.000000000 +0100 @@ -4,7 +4,7 @@ "Mike Schilli <m...@perlmeister.com>" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter version 2.133380", + "generated_by" : "ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter version 2.142690", "license" : [ "unknown" ], @@ -50,5 +50,5 @@ "url" : "http://github.com/mschilli/sysadm-install-perl" } }, - "version" : "0.47" + "version" : "0.48" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sysadm-Install-0.47/META.yml new/Sysadm-Install-0.48/META.yml --- old/Sysadm-Install-0.47/META.yml 2016-05-30 09:27:17.000000000 +0200 +++ new/Sysadm-Install-0.48/META.yml 2016-11-16 07:33:35.000000000 +0100 @@ -3,30 +3,30 @@ author: - 'Mike Schilli <m...@perlmeister.com>' build_requires: - ExtUtils::MakeMaker: 0 + ExtUtils::MakeMaker: '0' configure_requires: - ExtUtils::MakeMaker: 0 + ExtUtils::MakeMaker: '0' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter version 2.133380' +generated_by: 'ExtUtils::MakeMaker version 7.04, CPAN::Meta::Converter version 2.142690' license: unknown meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + version: '1.4' name: Sysadm-Install no_index: directory: - t - inc requires: - Cwd: 0 - File::Basename: 0 - File::Copy: 0 - File::Path: 0 - File::Temp: 0.16 - File::Which: 1.09 - LWP::Simple: 0 - Log::Log4perl: 1.28 - Term::ReadKey: 0 + Cwd: '0' + File::Basename: '0' + File::Copy: '0' + File::Path: '0' + File::Temp: '0.16' + File::Which: '1.09' + LWP::Simple: '0' + Log::Log4perl: '1.28' + Term::ReadKey: '0' resources: repository: http://github.com/mschilli/sysadm-install-perl -version: 0.47 +version: '0.48' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sysadm-Install-0.47/README new/Sysadm-Install-0.48/README --- old/Sysadm-Install-0.47/README 2016-05-30 09:27:07.000000000 +0200 +++ new/Sysadm-Install-0.48/README 2016-11-16 07:33:35.000000000 +0100 @@ -1,5 +1,5 @@ ###################################################################### - Sysadm::Install 0.47 + Sysadm::Install 0.48 ###################################################################### NAME @@ -106,14 +106,14 @@ ("apple", "pear", "pineapple" will be returned by "pick()". If the optional $opts hash has "{ tty => 1 }" set, then the user - reponse will be expected from the console, not STDIN. + response will be expected from the console, not STDIN. "ask($prompt, $default, $opts)" Ask the user to either hit *Enter* and select the displayed default or to type in another string. If the optional $opts hash has "{ tty => 1 }" set, then the user - reponse will be expected from the console, not STDIN. + response will be expected from the console, not STDIN. "mkd($dir)" Create a directory of arbitrary depth, just like @@ -188,10 +188,11 @@ my $unicode_string = slurp( $file, {utf8 => 1} ); - "blurt($data, $file, $append)" + "blurt($data, $file, $options)" Opens a new file, prints the data in $data to it and closes the - file. If $append is set to a true value, data will be appended to - the file. Default is false, existing files will be overwritten. + file. If "$options->{append}" is set to a true value, data will be + appended to the file. Default is false, existing files will be + overwritten. If the string is a Unicode string, use the "utf8" option: diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Sysadm-Install-0.47/lib/Sysadm/Install.pm new/Sysadm-Install-0.48/lib/Sysadm/Install.pm --- old/Sysadm-Install-0.47/lib/Sysadm/Install.pm 2016-05-30 09:18:44.000000000 +0200 +++ new/Sysadm-Install-0.48/lib/Sysadm/Install.pm 2016-11-16 07:31:58.000000000 +0100 @@ -6,7 +6,7 @@ use strict; use warnings; -our $VERSION = '0.47'; +our $VERSION = '0.48'; use File::Copy; use File::Path; @@ -390,7 +390,7 @@ C<pick()>. If the optional C<$opts> hash has C<{ tty =E<gt> 1 }> set, then -the user reponse will be expected from the console, not STDIN. +the user response will be expected from the console, not STDIN. =cut @@ -440,7 +440,7 @@ or to type in another string. If the optional C<$opts> hash has C<{ tty =E<gt> 1 }> set, then -the user reponse will be expected from the console, not STDIN. +the user response will be expected from the console, not STDIN. =cut @@ -471,8 +471,11 @@ $opts = {} if !defined $opts; - my $fh = *STDERR; + my $fh = *STDERR; + my $old_stderr; if( $opts->{ tty } ) { + open $old_stderr, ">&", \*STDERR or + die "Can't dup STDERR: $!"; open $fh, ">>", '/dev/tty' or die "Cannot open /dev/tty ($!)"; } @@ -482,6 +485,8 @@ if( $opts->{ tty } ) { close $fh; + open STDERR, ">&", $old_stderr or + die "Can't reset STDERR"; } return 1; @@ -892,10 +897,10 @@ =pod -=item C<blurt($data, $file, $append)> +=item C<blurt($data, $file, $options)> -Opens a new file, prints the data in C<$data> to it and closes the file. -If C<$append> is set to a true value, data will be appended to the +Opens a new file, prints the data in C<$data> to it and closes the file. If +C<$options-E<gt>{append}> is set to a true value, data will be appended to the file. Default is false, existing files will be overwritten. If the string is a Unicode string, use the C<utf8> option: