Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-CGI for openSUSE:Factory 
checked in at 2023-05-04 17:09:18
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-CGI (Old)
 and      /work/SRC/openSUSE:Factory/.perl-CGI.new.1533 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-CGI"

Thu May  4 17:09:18 2023 rev:27 rq:1084444 version:4.57

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-CGI/perl-CGI.changes        2023-03-11 
18:24:23.158988789 +0100
+++ /work/SRC/openSUSE:Factory/.perl-CGI.new.1533/perl-CGI.changes      
2023-05-04 17:09:24.739956678 +0200
@@ -1,0 +2,11 @@
+Wed May  3 03:06:05 UTC 2023 - Tina Müller <timueller+p...@suse.de>
+
+- updated to 4.57
+   see /usr/share/doc/packages/perl-CGI/Changes
+
+  4.57 2023-05-01
+
+      [ DOCUMENTATION ]
+      - Documentation tweaks around uploadInfo() and hooks (GH #256, thanks to 
rlauer6)
+
+-------------------------------------------------------------------

Old:
----
  CGI-4.56.tar.gz

New:
----
  CGI-4.57.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-CGI.spec ++++++
--- /var/tmp/diff_new_pack.PdMwFj/_old  2023-05-04 17:09:25.135958996 +0200
+++ /var/tmp/diff_new_pack.PdMwFj/_new  2023-05-04 17:09:25.139959019 +0200
@@ -18,7 +18,7 @@
 
 %define cpan_name CGI
 Name:           perl-CGI
-Version:        4.56
+Version:        4.57
 Release:        0
 License:        Artistic-2.0
 Summary:        Handle Common Gateway Interface requests and responses
@@ -56,7 +56,7 @@
 %prep
 %autosetup  -n %{cpan_name}-%{version}
 
-find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path 
"*/script/*" ! -name "configure" -print0 | xargs -0 chmod 644
+find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path 
"*/script/*" ! -path "*/scripts/*" ! -name "configure" -print0 | xargs -0 chmod 
644
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor

++++++ CGI-4.56.tar.gz -> CGI-4.57.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/Changes new/CGI-4.57/Changes
--- old/CGI-4.56/Changes        2023-03-03 09:41:25.000000000 +0100
+++ new/CGI-4.57/Changes        2023-05-02 15:12:42.000000000 +0200
@@ -1,3 +1,8 @@
+4.57 2023-05-01
+
+    [ DOCUMENTATION ]
+    - Documentation tweaks around uploadInfo() and hooks (GH #256, thanks to 
rlauer6)
+
 4.56 2023-03-01
 
     [ TESTING ]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/META.json new/CGI-4.57/META.json
--- old/CGI-4.56/META.json      2023-03-03 09:45:43.000000000 +0100
+++ new/CGI-4.57/META.json      2023-05-02 15:14:17.000000000 +0200
@@ -77,6 +77,6 @@
          "web" : "https://github.com/leejo/CGI.pm";
       }
    },
-   "version" : "4.56",
+   "version" : "4.57",
    "x_serialization_backend" : "JSON::PP version 4.06"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/META.yml new/CGI-4.57/META.yml
--- old/CGI-4.56/META.yml       2023-03-03 09:45:43.000000000 +0100
+++ new/CGI-4.57/META.yml       2023-05-02 15:14:17.000000000 +0200
@@ -46,5 +46,5 @@
   homepage: https://metacpan.org/module/CGI
   license: http://dev.perl.org/licenses/
   repository: https://github.com/leejo/CGI.pm
-version: '4.56'
+version: '4.57'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/README.md new/CGI-4.57/README.md
--- old/CGI-4.56/README.md      2022-02-03 08:41:26.000000000 +0100
+++ new/CGI-4.57/README.md      2023-05-02 14:01:39.000000000 +0200
@@ -1000,10 +1000,11 @@
 the name of the temporary file that CGI.pm creates during upload spooling
 (see below).
 
-When a file is uploaded the browser usually sends along some information along
-with it in the format of headers. The information usually includes the MIME
-content type. To retrieve this information, call uploadInfo(). It returns a
-reference to a hash containing all the document headers.
+When a file is uploaded the browser usually sends along some
+information along with it in the Content-Type (MIME type) and
+Content-Disposition (filename) headers.  To retrieve this information,
+call uploadInfo(). It returns a reference to a hash containing all the
+document headers.
 
     my $filehandle = $q->upload( 'uploaded_file' );
     my $type       = $q->uploadInfo( $filehandle )->{'Content-Type'};
@@ -1017,6 +1018,16 @@
 the literal filename rather than the File::Temp object, which will not return
 anything when passed to uploadInfo. So don't use ->Vars.
 
+When uploading multiple files, call ->param() in list context to
+retrieve a list of filehandles that you can use when calling ->uploadInfo.
+
+    my @filehandles = $q->param('uploaded_file');
+
+    for my $fh (@filehandles) {
+      my $info = $q->uploadInfo($fh);
+      ...
+    }
+
 If you are using a machine that recognizes "text" and "binary" data modes, be
 sure to understand when and how to use them (see the Camel book). Otherwise
 you may find that binary files are corrupted during file uploads.
@@ -1102,10 +1113,27 @@
 The `$data` field is optional; it lets you pass configuration information
 (e.g. a database handle) to your hook callback.
 
-The `$use_tempfile` field is a flag that lets you turn on and off CGI.pm's
-use of a temporary disk-based file during file upload. If you set this to a
-FALSE value (default true) then $q->param('uploaded\_file') will no longer 
work,
-and the only way to get at the uploaded data is via the hook you provide.
+The `$use_tempfile` field is a flag that lets you turn on and off
+CGI.pm's use of a temporary disk-based file during file upload. If you
+set this to a FALSE value (default true) then
+`$q->param('uploaded_file')` will still return a typeglob that can be
+used to access a filehandle and the filename of the uploaded file,
+however the filehandle will be a handle to an empty file. Existence of
+your hook causes CGI.pm to bypass writing to that filehandle (which is
+probably what you intended when you set `$use_tempfile` off).
+
+The `uploadInfo()` method can be used on the typeglob returned to
+you when you called `$q->param('upload_file')` to return
+information about the uploaded file(s). For multiple file uploads, use
+the ` param() ` method in list context to retrieve all of the
+typeglobs.
+
+    my (@filehandles) = $cgi->param('upfile');
+
+    foreach my $fh (@filehandles) {
+      my $info = $cgi->uploadInfo($fh);
+      ...
+    }
 
 If using the function-oriented interface, call the CGI::upload\_hook() method
 before calling param() or any other CGI functions:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/lib/CGI/Carp.pm new/CGI-4.57/lib/CGI/Carp.pm
--- old/CGI-4.56/lib/CGI/Carp.pm        2023-03-03 09:40:08.000000000 +0100
+++ new/CGI-4.57/lib/CGI/Carp.pm        2023-05-02 14:05:04.000000000 +0200
@@ -326,7 +326,7 @@
 
 $main::SIG{__WARN__}=\&CGI::Carp::warn;
 
-$CGI::Carp::VERSION     = '4.56';
+$CGI::Carp::VERSION     = '4.57';
 $CGI::Carp::CUSTOM_MSG  = undef;
 $CGI::Carp::DIE_HANDLER = undef;
 $CGI::Carp::TO_BROWSER  = 1;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/lib/CGI/File/Temp.pm 
new/CGI-4.57/lib/CGI/File/Temp.pm
--- old/CGI-4.56/lib/CGI/File/Temp.pm   2023-03-03 09:40:16.000000000 +0100
+++ new/CGI-4.57/lib/CGI/File/Temp.pm   2023-05-02 14:05:23.000000000 +0200
@@ -3,7 +3,7 @@
 # you use it directly and your code breaks horribly.
 package CGI::File::Temp;
 
-$CGI::File::Temp::VERSION = '4.56';
+$CGI::File::Temp::VERSION = '4.57';
 
 use parent File::Temp;
 use parent Fh;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/lib/CGI/Pretty.pm 
new/CGI-4.57/lib/CGI/Pretty.pm
--- old/CGI-4.56/lib/CGI/Pretty.pm      2023-03-03 09:40:19.000000000 +0100
+++ new/CGI-4.57/lib/CGI/Pretty.pm      2023-05-02 14:05:26.000000000 +0200
@@ -5,7 +5,7 @@
 
 use CGI ();
 
-$CGI::Pretty::VERSION = '4.56';
+$CGI::Pretty::VERSION = '4.57';
 $CGI::DefaultClass = __PACKAGE__;
 @CGI::Pretty::ISA = qw( CGI );
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/lib/CGI/Push.pm new/CGI-4.57/lib/CGI/Push.pm
--- old/CGI-4.56/lib/CGI/Push.pm        2023-03-03 09:40:22.000000000 +0100
+++ new/CGI-4.57/lib/CGI/Push.pm        2023-05-02 14:05:29.000000000 +0200
@@ -5,7 +5,7 @@
 use warnings;
 #/;
 
-$CGI::Push::VERSION='4.56';
+$CGI::Push::VERSION='4.57';
 use CGI;
 use CGI::Util 'rearrange';
 @ISA = ('CGI');
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/lib/CGI.pm new/CGI-4.57/lib/CGI.pm
--- old/CGI-4.56/lib/CGI.pm     2023-03-03 09:39:58.000000000 +0100
+++ new/CGI-4.57/lib/CGI.pm     2023-05-02 14:05:01.000000000 +0200
@@ -7,7 +7,7 @@
 use warnings;
 #/;
 
-$CGI::VERSION='4.56';
+$CGI::VERSION='4.57';
 
 use CGI::Util qw(rearrange rearrange_header make_attributes unescape escape 
expires ebcdic2ascii ascii2ebcdic);
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/lib/CGI.pod new/CGI-4.57/lib/CGI.pod
--- old/CGI-4.56/lib/CGI.pod    2022-02-03 08:29:06.000000000 +0100
+++ new/CGI-4.57/lib/CGI.pod    2023-05-02 14:00:41.000000000 +0200
@@ -1,3 +1,4 @@
+
 =head1 NAME
 
 CGI - Handle Common Gateway Interface requests and responses
@@ -1011,10 +1012,11 @@
 the name of the temporary file that CGI.pm creates during upload spooling
 (see below).
 
-When a file is uploaded the browser usually sends along some information along
-with it in the format of headers. The information usually includes the MIME
-content type. To retrieve this information, call uploadInfo(). It returns a
-reference to a hash containing all the document headers.
+When a file is uploaded the browser usually sends along some
+information along with it in the Content-Type (MIME type) and
+Content-Disposition (filename) headers.  To retrieve this information,
+call uploadInfo(). It returns a reference to a hash containing all the
+document headers.
 
     my $filehandle = $q->upload( 'uploaded_file' );
     my $type       = $q->uploadInfo( $filehandle )->{'Content-Type'};
@@ -1028,6 +1030,16 @@
 the literal filename rather than the File::Temp object, which will not return
 anything when passed to uploadInfo. So don't use ->Vars.
 
+When uploading multiple files, call ->param() in list context to
+retrieve a list of filehandles that you can use when calling ->uploadInfo.
+
+    my @filehandles = $q->param('uploaded_file');
+
+    for my $fh (@filehandles) {
+      my $info = $q->uploadInfo($fh);
+      ...
+    }
+
 If you are using a machine that recognizes "text" and "binary" data modes, be
 sure to understand when and how to use them (see the Camel book). Otherwise
 you may find that binary files are corrupted during file uploads.
@@ -1113,10 +1125,27 @@
 The C<< $data >> field is optional; it lets you pass configuration information
 (e.g. a database handle) to your hook callback.
 
-The C<< $use_tempfile >> field is a flag that lets you turn on and off CGI.pm's
-use of a temporary disk-based file during file upload. If you set this to a
-FALSE value (default true) then $q->param('uploaded_file') will no longer work,
-and the only way to get at the uploaded data is via the hook you provide.
+The C<< $use_tempfile >> field is a flag that lets you turn on and off
+CGI.pm's use of a temporary disk-based file during file upload. If you
+set this to a FALSE value (default true) then
+C<<< $q->param('uploaded_file') >>> will still return a typeglob that can be
+used to access a filehandle and the filename of the uploaded file,
+however the filehandle will be a handle to an empty file. Existence of
+your hook causes CGI.pm to bypass writing to that filehandle (which is
+probably what you intended when you set C<< $use_tempfile >> off).
+
+The C<< uploadInfo() >> method can be used on the typeglob returned to
+you when you called C<<< $q->param('upload_file') >>> to return
+information about the uploaded file(s). For multiple file uploads, use
+the C< param() > method in list context to retrieve all of the
+typeglobs.
+
+    my (@filehandles) = $cgi->param('upfile');
+
+    foreach my $fh (@filehandles) {
+      my $info = $cgi->uploadInfo($fh);
+      ...
+    }
 
 If using the function-oriented interface, call the CGI::upload_hook() method
 before calling param() or any other CGI functions:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/CGI-4.56/lib/Fh.pm new/CGI-4.57/lib/Fh.pm
--- old/CGI-4.56/lib/Fh.pm      2023-03-03 09:40:31.000000000 +0100
+++ new/CGI-4.57/lib/Fh.pm      2023-05-02 14:05:33.000000000 +0200
@@ -5,6 +5,6 @@
 use strict;
 use warnings;
 
-$Fh::VERSION = '4.56';
+$Fh::VERSION = '4.57';
 
 1;

Reply via email to