Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-OLE-Storage_Lite for
openSUSE:Factory checked in at 2025-12-01 11:11:33
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-OLE-Storage_Lite (Old)
and /work/SRC/openSUSE:Factory/.perl-OLE-Storage_Lite.new.14147 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-OLE-Storage_Lite"
Mon Dec 1 11:11:33 2025 rev:13 rq:1320473 version:0.240.0
Changes:
--------
---
/work/SRC/openSUSE:Factory/perl-OLE-Storage_Lite/perl-OLE-Storage_Lite.changes
2023-02-21 15:35:44.404182874 +0100
+++
/work/SRC/openSUSE:Factory/.perl-OLE-Storage_Lite.new.14147/perl-OLE-Storage_Lite.changes
2025-12-01 11:11:44.626502882 +0100
@@ -1,0 +2,8 @@
+Sat Nov 22 05:32:03 UTC 2025 - Tina Müller <[email protected]>
+
+- updated to 0.240.0 (0.24)
+ see /usr/share/doc/packages/perl-OLE-Storage_Lite/Changes
+
+ 0.24 Fri Nov 21 2025
+
+-------------------------------------------------------------------
Old:
----
OLE-Storage_Lite-0.22.tar.gz
New:
----
OLE-Storage_Lite-0.24.tar.gz
README.md
_scmsync.obsinfo
build.specials.obscpio
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-OLE-Storage_Lite.spec ++++++
--- /var/tmp/diff_new_pack.4K6bli/_old 2025-12-01 11:11:45.322532324 +0100
+++ /var/tmp/diff_new_pack.4K6bli/_new 2025-12-01 11:11:45.322532324 +0100
@@ -1,7 +1,7 @@
#
# spec file for package perl-OLE-Storage_Lite
#
-# Copyright (c) 2023 SUSE LLC
+# Copyright (c) 2025 SUSE LLC and contributors
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -18,17 +18,26 @@
%define cpan_name OLE-Storage_Lite
Name: perl-OLE-Storage_Lite
-Version: 0.22
+Version: 0.240.0
Release: 0
+# 0.24 -> normalize -> 0.240.0
+%define cpan_version 0.24
#Upstream: Japan. All rights reserved. You may distribute under the terms of
either the GNU General Public License or the Artistic License, as specified in
the Perl README file.
License: Artistic-1.0 OR GPL-1.0-or-later
Summary: Read and write OLE storage files
URL: https://metacpan.org/release/%{cpan_name}
-Source0:
https://cpan.metacpan.org/authors/id/J/JM/JMCNAMARA/%{cpan_name}-%{version}.tar.gz
+Source0:
https://cpan.metacpan.org/authors/id/J/JM/JMCNAMARA/%{cpan_name}-%{cpan_version}.tar.gz
Source1: cpanspec.yml
+Source100: README.md
BuildArch: noarch
BuildRequires: perl
BuildRequires: perl-macros
+Provides: perl(OLE::Storage_Lite) = %{version}
+Provides: perl(OLE::Storage_Lite::PPS) = %{version}
+Provides: perl(OLE::Storage_Lite::PPS::Dir) = %{version}
+Provides: perl(OLE::Storage_Lite::PPS::File) = %{version}
+Provides: perl(OLE::Storage_Lite::PPS::Root) = %{version}
+%undefine __perllib_provides
%{perl_requires}
%description
@@ -39,7 +48,7 @@
OLE::Storage_Lite::PPS::Dir are subclasses of OLE::Storage_Lite::PPS.
%prep
-%autosetup -n %{cpan_name}-%{version}
+%autosetup -n %{cpan_name}-%{cpan_version} -p1
%build
perl Makefile.PL INSTALLDIRS=vendor
++++++ OLE-Storage_Lite-0.22.tar.gz -> OLE-Storage_Lite-0.24.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/OLE-Storage_Lite-0.22/Changes
new/OLE-Storage_Lite-0.24/Changes
--- old/OLE-Storage_Lite-0.22/Changes 2023-02-17 10:46:12.000000000 +0100
+++ new/OLE-Storage_Lite-0.24/Changes 2025-11-22 01:02:13.000000000 +0100
@@ -1,13 +1,27 @@
Revision history for Perl extension OLE::Storage_Lite.
+0.24 Fri Nov 21 2025
-0.21 Fri Feb 17 2020
+ ! Fix for versions in package.
+
+
+0.23 Fri Nov 21 2025
+
+ ! Fixed issue where files with leading or trailing whitespace
+ weren't handled correctly.
+ https://github.com/jmcnamara/ole-storage-lite/pull/9
+
+ + Updated (!?) perl requirement to v5.006.
+ https://github.com/jmcnamara/ole-storage-lite/pull/6
+
+
+0.22 Fri Feb 17 2023
+ Fix for Spreadsheet::ParseExcel break due to the previous change in
- v0.20. https://github.com/jmcnamara/ole-storage-lite/pull/4
+ v0.21. https://github.com/jmcnamara/ole-storage-lite/pull/4
-0.20 Wed Feb 15 2020
+0.21 Wed Feb 15 2023
+ Added performance improvement of 95+ percent on certain complex
messages. Patch from Todd Richmond.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/OLE-Storage_Lite-0.22/META.json
new/OLE-Storage_Lite-0.24/META.json
--- old/OLE-Storage_Lite-0.22/META.json 2023-02-17 10:49:36.000000000 +0100
+++ new/OLE-Storage_Lite-0.24/META.json 2025-11-22 01:02:53.000000000 +0100
@@ -4,13 +4,13 @@
"Kawai Takanori ([email protected])"
],
"dynamic_config" : 1,
- "generated_by" : "ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter
version 2.150001",
+ "generated_by" : "ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter
version 2.150010",
"license" : [
"unknown"
],
"meta-spec" : {
"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";,
- "version" : "2"
+ "version" : 2
},
"name" : "OLE-Storage_Lite",
"no_index" : {
@@ -31,9 +31,12 @@
}
},
"runtime" : {
- "requires" : {}
+ "requires" : {
+ "perl" : "5.006"
+ }
}
},
"release_status" : "stable",
- "version" : "0.22"
+ "version" : "0.24",
+ "x_serialization_backend" : "JSON::PP version 4.06"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/OLE-Storage_Lite-0.22/META.yml
new/OLE-Storage_Lite-0.24/META.yml
--- old/OLE-Storage_Lite-0.22/META.yml 2023-02-17 10:49:36.000000000 +0100
+++ new/OLE-Storage_Lite-0.24/META.yml 2025-11-22 01:02:53.000000000 +0100
@@ -7,7 +7,7 @@
configure_requires:
ExtUtils::MakeMaker: '0'
dynamic_config: 1
-generated_by: 'ExtUtils::MakeMaker version 7.0401, CPAN::Meta::Converter
version 2.150001'
+generated_by: 'ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter version
2.150010'
license: unknown
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -17,5 +17,7 @@
directory:
- t
- inc
-requires: {}
-version: '0.22'
+requires:
+ perl: '5.006'
+version: '0.24'
+x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/OLE-Storage_Lite-0.22/Makefile.PL
new/OLE-Storage_Lite-0.24/Makefile.PL
--- old/OLE-Storage_Lite-0.22/Makefile.PL 2023-02-17 10:42:29.000000000
+0100
+++ new/OLE-Storage_Lite-0.24/Makefile.PL 2025-11-21 22:16:41.657585196
+0100
@@ -1,14 +1,20 @@
+use 5.006;
+
+use strict;
+use warnings;
+
use ExtUtils::MakeMaker;
WriteMakefile(
- ($] >= 5.005 ? (
'AUTHOR' => 'Kawai Takanori ([email protected])',
- 'ABSTRACT' => 'Read and write OLE storage files.', ) : () ),
+ 'ABSTRACT' => 'Read and write OLE storage files.',
'NAME' => 'OLE::Storage_Lite',
'VERSION_FROM' => 'lib/OLE/Storage_Lite.pm',
'NEEDS_LINKING' => 0,
- 'PREREQ_PM' => {},
+ 'PREREQ_PM' => {
+ 'perl' => '5.006',
+ },
'dist' => {COMPRESS => 'gzip --best', SUFFIX => 'gz'},
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/OLE-Storage_Lite-0.22/README
new/OLE-Storage_Lite-0.24/README
--- old/OLE-Storage_Lite-0.22/README 2023-02-17 10:42:29.000000000 +0100
+++ new/OLE-Storage_Lite-0.24/README 2025-11-21 22:16:41.000000000 +0100
@@ -8,7 +8,7 @@
Macintosh platforms.
REQUIREMENT
- Perl 5.005 or later.
+ Perl 5.006 or later.
INSTALLATION
The module can be installed using the standard Perl procedure:
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/OLE-Storage_Lite-0.22/lib/OLE/Storage_Lite.pm
new/OLE-Storage_Lite-0.24/lib/OLE/Storage_Lite.pm
--- old/OLE-Storage_Lite-0.22/lib/OLE/Storage_Lite.pm 2023-02-17
10:44:20.000000000 +0100
+++ new/OLE-Storage_Lite-0.24/lib/OLE/Storage_Lite.pm 2025-11-22
00:57:04.000000000 +0100
@@ -1,6 +1,9 @@
# OLE::Storage_Lite
# by Kawai, Takanori (Hippo2000) 2000.11.4, 8, 14
# This Program is Still ALPHA version.
+
+use 5.006;
+
#//////////////////////////////////////////////////////////////////////////////
# OLE::Storage_Lite::PPS Object
#//////////////////////////////////////////////////////////////////////////////
@@ -8,11 +11,8 @@
# OLE::Storage_Lite::PPS
#==============================================================================
package OLE::Storage_Lite::PPS;
-require Exporter;
use strict;
-use vars qw($VERSION @ISA);
-@ISA = qw(Exporter);
-$VERSION = '0.22';
+our $VERSION = '0.24';
#------------------------------------------------------------------------------
# new (OLE::Storage_Lite::PPS)
@@ -27,7 +27,7 @@
($iNo, $sNm, $iType, $iPrev, $iNext, $iDir, $raTime1st, $raTime2nd,
$iStart, $iSize, $sData, $raChild);
}
- elsif($iType == OLE::Storage_Lite::PpsType_Dir()) { #DIRECTRY
+ elsif($iType == OLE::Storage_Lite::PpsType_Dir()) { #DIRECTORY
return OLE::Storage_Lite::PPS::Dir->_new
($iNo, $sNm, $iType, $iPrev, $iNext, $iDir, $raTime1st, $raTime2nd,
$iStart, $iSize, $sData, $raChild);
@@ -164,14 +164,12 @@
# OLE::Storage_Lite::PPS::Root
#==============================================================================
package OLE::Storage_Lite::PPS::Root;
-require Exporter;
use strict;
use IO::File;
use IO::Handle;
use Fcntl;
-use vars qw($VERSION @ISA);
-@ISA = qw(OLE::Storage_Lite::PPS Exporter);
-$VERSION = '0.22';
+our @ISA = qw(OLE::Storage_Lite::PPS);
+our $VERSION = '0.24';
sub _savePpsSetPnt($$$);
sub _savePpsSetPnt2($$$);
#------------------------------------------------------------------------------
@@ -232,7 +230,7 @@
elsif(!ref($sFile)) {
if($sFile ne '-') {
my $oIo = new IO::File;
- $oIo->open(">$sFile") || return undef;
+ $oIo->open($sFile, "w") || return undef;
binmode($oIo);
$rhInfo->{_FILEH_} = $oIo;
}
@@ -268,7 +266,7 @@
#3.Make Small Data string (write SBD)
my $sSmWk = $oThis->_makeSmallData(\@aList, $rhInfo);
- $oThis->{Data} = $sSmWk; #Small Datas become RootEntry Data
+ $oThis->{Data} = $sSmWk; #Small Data become RootEntry Data
#4. Write BB
my $iBBlk = $iSBDcnt;
@@ -277,7 +275,7 @@
#5. Write PPS
$oThis->_savePps(\@aList, $rhInfo);
- #6. Write BD and BDList and Adding Header informations
+ #6. Write BD and BDList and Adding Header information
$oThis->_saveBbd($iSBDcnt, $iBBcnt, $iPPScnt, $rhInfo);
#7.Close File
@@ -496,7 +494,7 @@
push @$raList, $aThis->[$iPos];
$aThis->[$iPos]->{No} = $#$raList;
-#1.3.2 Devide a array into Previous,Next
+#1.3.2 Divide a array into Previous,Next
$aThis->[$iPos]->{NextPps} = _savePpsSetPnt2(
\@aNext, $raList, $rhInfo);
$aThis->[$iPos]->{DirPps} = _savePpsSetPnt2($aThis->[$iPos]->{Child},
$raList, $rhInfo);
@@ -532,7 +530,7 @@
push @$raList, $aThis->[$iPos];
$aThis->[$iPos]->{No} = $#$raList;
my @aWk = @$aThis;
-#1.3.2 Devide a array into Previous,Next
+#1.3.2 Divide a array into Previous,Next
my @aPrev = splice(@aWk, 0, $iPos);
my @aNext = splice(@aWk, 1, $iCnt - $iPos -1);
$aThis->[$iPos]->{PrevPps} = _savePpsSetPnt2(
@@ -571,7 +569,7 @@
push @$raList, $aThis->[$iPos];
$aThis->[$iPos]->{No} = $#$raList;
my @aWk = @$aThis;
-#1.3.2 Devide a array into Previous,Next
+#1.3.2 Divide a array into Previous,Next
my @aPrev = splice(@aWk, 0, $iPos);
my @aNext = splice(@aWk, 1, $iCnt - $iPos -1);
$aThis->[$iPos]->{PrevPps} = _savePpsSetPnt(
@@ -610,7 +608,7 @@
push @$raList, $aThis->[$iPos];
$aThis->[$iPos]->{No} = $#$raList;
my @aWk = @$aThis;
-#1.3.2 Devide a array into Previous,Next
+#1.3.2 Divide a array into Previous,Next
my @aPrev = splice(@aWk, 0, $iPos);
my @aNext = splice(@aWk, 1, $iCnt - $iPos -1);
$aThis->[$iPos]->{PrevPps} = _savePpsSetPnt(
@@ -709,11 +707,9 @@
# OLE::Storage_Lite::PPS::File
#==============================================================================
package OLE::Storage_Lite::PPS::File;
-require Exporter;
use strict;
-use vars qw($VERSION @ISA);
-@ISA = qw(OLE::Storage_Lite::PPS Exporter);
-$VERSION = '0.22';
+our @ISA = qw(OLE::Storage_Lite::PPS);
+our $VERSION = '0.24';
#------------------------------------------------------------------------------
# new (OLE::Storage_Lite::PPS::File)
#------------------------------------------------------------------------------
@@ -797,11 +793,9 @@
# new (OLE::Storage_Lite::PPS::Dir)
#------------------------------------------------------------------------------
package OLE::Storage_Lite::PPS::Dir;
-require Exporter;
use strict;
-use vars qw($VERSION @ISA);
-@ISA = qw(OLE::Storage_Lite::PPS Exporter);
-$VERSION = '0.22';
+our @ISA = qw(OLE::Storage_Lite::PPS);
+our $VERSION = '0.24';
sub new ($$;$$$) {
my($sClass, $sName, $raTime1st, $raTime2nd, $raChild) = @_;
OLE::Storage_Lite::PPS::_new(
@@ -823,7 +817,6 @@
# OLE::Storage_Lite
#==============================================================================
package OLE::Storage_Lite;
-require Exporter;
use strict;
use Carp;
@@ -831,9 +824,7 @@
use List::Util qw(first);
use Time::Local 'timegm';
-use vars qw($VERSION @ISA @EXPORT);
-@ISA = qw(Exporter);
-$VERSION = '0.22';
+our $VERSION = '0.24';
sub _getPpsSearch($$$$$;$);
sub _getPpsTree($$$;$);
#------------------------------------------------------------------------------
@@ -924,7 +915,7 @@
#3. $sFile is a simple filename string
elsif(!ref($sFile)) {
$oIo = new IO::File;
- $oIo->open("<$sFile") || return undef;
+ $oIo->open($sFile, "r") || return undef;
binmode($oIo);
}
#4 Assume that if $sFile is a ref then it is a valid filehandle
@@ -1003,7 +994,7 @@
return @aRes;
}
#===================================================================
-# Get Header Info (BASE Informain about that file)
+# Get Header Info (BASE Information about that file)
#===================================================================
sub _getHeaderInfo($){
my($FILE) = @_;
@@ -1370,9 +1361,9 @@
return "\x00" x 8 unless $localtime;
# Convert from localtime (actually gmtime) to seconds.
- my @localtimecopy = @{$localtime};
- $localtimecopy[5] += 1900 unless $localtimecopy[5] > 99;
- my $time = timegm( @localtimecopy );
+ my @localtime_copy = @{$localtime};
+ $localtime_copy[5] += 1900 unless $localtime_copy[5] > 99;
+ my $time = timegm( @localtime_copy );
# Add the number of seconds between the 1601 and 1970 epochs.
$time += 11644473600;
@@ -1411,7 +1402,7 @@
# From a filehandle object
use IO::File;
my $oIo = new IO::File;
- $oIo->open("<iofile.xls");
+ $oIo->open("iofile.xls", "r");
binmode($oIo);
my $oOl = OLE::Storage_Lite->new($oFile);
@@ -1425,8 +1416,8 @@
# To a filehandle object
my $oIo = new IO::File;
- $oIo->open(">iofile.xls");
- bimode($oIo);
+ $oIo->open("iofile.xls", "w");
+ binmode($oIo);
$oPps->save($oIo);
++++++ README.md ++++++
## Build Results
Current state of perl in openSUSE:Factory is
The current state of perl in the devel project build (devel:languages:perl)
++++++ _scmsync.obsinfo ++++++
mtime: 1763789524
commit: a91844a9df335a9c1a7c626dca4506f69387b77d046dc3875b508feab17863e7
url: https://src.opensuse.org/perl/perl-OLE-Storage_Lite.git
revision: a91844a9df335a9c1a7c626dca4506f69387b77d046dc3875b508feab17863e7
projectscmsync: https://src.opensuse.org/perl/_ObsPrj
++++++ build.specials.obscpio ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/.gitignore new/.gitignore
--- old/.gitignore 1970-01-01 01:00:00.000000000 +0100
+++ new/.gitignore 2025-11-25 09:54:29.000000000 +0100
@@ -0,0 +1 @@
+.osc
