Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-Verilog-Perl for 
openSUSE:Factory checked in at 2021-06-19 23:04:23
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Verilog-Perl (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Verilog-Perl.new.2625 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Verilog-Perl"

Sat Jun 19 23:04:23 2021 rev:10 rq:900874 version:3.478

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Verilog-Perl/perl-Verilog-Perl.changes      
2021-04-15 16:58:15.742754528 +0200
+++ 
/work/SRC/openSUSE:Factory/.perl-Verilog-Perl.new.2625/perl-Verilog-Perl.changes
    2021-06-19 23:05:05.179860656 +0200
@@ -1,0 +2,10 @@
+Mon Jun  7 03:09:20 UTC 2021 - Tina M??ller <timueller+p...@suse.de>
+
+- updated to 3.478
+   see /usr/share/doc/packages/perl-Verilog-Perl/Changes
+
+  * Verilog-Perl 3.478 2021-06-06
+
+  ****  Fix ${ENVVAR} expansion (#1671). [Henry Hsieh]
+
+-------------------------------------------------------------------

Old:
----
  Verilog-Perl-3.476.tar.gz

New:
----
  Verilog-Perl-3.478.tar.gz

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

Other differences:
------------------
++++++ perl-Verilog-Perl.spec ++++++
--- /var/tmp/diff_new_pack.3ku7bP/_old  2021-06-19 23:05:05.615861329 +0200
+++ /var/tmp/diff_new_pack.3ku7bP/_new  2021-06-19 23:05:05.619861335 +0200
@@ -18,7 +18,7 @@
 
 %define cpan_name Verilog-Perl
 Name:           perl-Verilog-Perl
-Version:        3.476
+Version:        3.478
 Release:        0
 Summary:        Verilog language utilities and parsing
 License:        Artistic-1.0 OR GPL-1.0-or-later

++++++ Verilog-Perl-3.476.tar.gz -> Verilog-Perl-3.478.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Changes 
new/Verilog-Perl-3.478/Changes
--- old/Verilog-Perl-3.476/Changes      2021-04-13 21:58:13.000000000 +0200
+++ new/Verilog-Perl-3.478/Changes      2021-06-06 15:44:03.000000000 +0200
@@ -4,6 +4,11 @@
 indicates the contributor was also the author of the fix; Thanks!
 
 
+* Verilog-Perl 3.478 2021-06-06
+
+****  Fix ${ENVVAR} expansion (#1671). [Henry Hsieh]
+
+
 * Verilog-Perl 3.476 2021-04-13
 
 ****  Fix parameter type = struct. [Nathan Chrisman]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/EditFiles.pm 
new/Verilog-Perl-3.478/EditFiles.pm
--- old/Verilog-Perl-3.476/EditFiles.pm 2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/EditFiles.pm 2021-06-06 15:44:13.000000000 +0200
@@ -13,7 +13,7 @@
 ######################################################################
 #### Configuration Section
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 #######################################################################
 # CONSTRUCTORS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Getopt.pm 
new/Verilog-Perl-3.478/Getopt.pm
--- old/Verilog-Perl-3.476/Getopt.pm    2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/Getopt.pm    2021-06-06 15:44:13.000000000 +0200
@@ -16,7 +16,7 @@
 ######################################################################
 #### Configuration Section
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 # Basenames we should ignore when recursing directories,
 # Because they contain large files of no relevance
@@ -386,12 +386,13 @@
     my $self = shift;
     my $filename = shift;
     my $out = $filename;
-    while ($filename =~ /\$([A-Za-z_0-9]+)\b/g
-           || $filename =~ /\$\{[A-Za-z_0-9]+\}\b/g) {
+    while ($filename =~ /\$([A-Za-z_0-9]+)\b/g) {
        my $var = $1;
-       if (defined $ENV{$var}) {
-           $out =~ s/\$$var\b/$ENV{$var}/g;
-       }
+       $out =~ s/\$$var\b/$ENV{$var}/g if defined $ENV{$var};
+    }
+    while ($filename =~ /\$\{([A-Za-z_0-9]+)\}/g) {
+       my $var = $1;
+       $out =~ s/\$\{$var\}/$ENV{$var}/g if defined $ENV{$var};
     }
     $out =~ s!^~!$ENV{HOME}/!;
     return $out;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Language.pm 
new/Verilog-Perl-3.478/Language.pm
--- old/Verilog-Perl-3.476/Language.pm  2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/Language.pm  2021-06-06 15:44:13.000000000 +0200
@@ -151,7 +151,7 @@
 ######################################################################
 #### Configuration Section
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 ######################################################################
 #### Internal Variables
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/META.yml 
new/Verilog-Perl-3.478/META.yml
--- old/Verilog-Perl-3.476/META.yml     2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/META.yml     2021-06-06 15:44:13.000000000 +0200
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:         Verilog-Perl
-version:      3.476
+version:      3.478
 version_from: Language.pm
 abstract:     Verilog language utilities and parsing
 license:      perl
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Cell.pm 
new/Verilog-Perl-3.478/Netlist/Cell.pm
--- old/Verilog-Perl-3.476/Netlist/Cell.pm      2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Cell.pm      2021-06-06 15:44:13.000000000 
+0200
@@ -11,7 +11,7 @@
 @ISA = qw(Verilog::Netlist::Cell::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('new',
        'Verilog::Netlist::Cell::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/ContAssign.pm 
new/Verilog-Perl-3.478/Netlist/ContAssign.pm
--- old/Verilog-Perl-3.476/Netlist/ContAssign.pm        2021-04-13 
21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/Netlist/ContAssign.pm        2021-06-06 
15:44:13.000000000 +0200
@@ -11,7 +11,7 @@
 @ISA = qw(Verilog::Netlist::ContAssign::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('new',
        'Verilog::Netlist::ContAssign::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Defparam.pm 
new/Verilog-Perl-3.478/Netlist/Defparam.pm
--- old/Verilog-Perl-3.476/Netlist/Defparam.pm  2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Defparam.pm  2021-06-06 15:44:13.000000000 
+0200
@@ -11,7 +11,7 @@
 @ISA = qw(Verilog::Netlist::Defparam::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('new',
        'Verilog::Netlist::Defparam::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/File.pm 
new/Verilog-Perl-3.478/Netlist/File.pm
--- old/Verilog-Perl-3.476/Netlist/File.pm      2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/File.pm      2021-06-06 15:44:13.000000000 
+0200
@@ -12,7 +12,7 @@
 @ISA = qw(Verilog::Netlist::File::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('new',
        'Verilog::Netlist::File::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Interface.pm 
new/Verilog-Perl-3.478/Netlist/Interface.pm
--- old/Verilog-Perl-3.476/Netlist/Interface.pm 2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Interface.pm 2021-06-06 15:44:13.000000000 
+0200
@@ -14,7 +14,7 @@
 @ISA = qw(Verilog::Netlist::Interface::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('new',
        'Verilog::Netlist::Interface::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Logger.pm 
new/Verilog-Perl-3.478/Netlist/Logger.pm
--- old/Verilog-Perl-3.476/Netlist/Logger.pm    2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Logger.pm    2021-06-06 15:44:13.000000000 
+0200
@@ -7,7 +7,7 @@
 use vars qw($VERSION);
 use strict;
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 # We don't use Verilog::Netlist::Subclass, as this is called from it!
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/ModPort.pm 
new/Verilog-Perl-3.478/Netlist/ModPort.pm
--- old/Verilog-Perl-3.476/Netlist/ModPort.pm   2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/ModPort.pm   2021-06-06 15:44:13.000000000 
+0200
@@ -12,7 +12,7 @@
 @ISA = qw(Verilog::Netlist::ModPort::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('new',
        'Verilog::Netlist::ModPort::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Module.pm 
new/Verilog-Perl-3.478/Netlist/Module.pm
--- old/Verilog-Perl-3.476/Netlist/Module.pm    2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Module.pm    2021-06-06 15:44:13.000000000 
+0200
@@ -17,7 +17,7 @@
 @ISA = qw(Verilog::Netlist::Module::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('new',
        'Verilog::Netlist::Module::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Net.pm 
new/Verilog-Perl-3.478/Netlist/Net.pm
--- old/Verilog-Perl-3.476/Netlist/Net.pm       2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Net.pm       2021-06-06 15:44:13.000000000 
+0200
@@ -11,7 +11,7 @@
 @ISA = qw(Verilog::Netlist::Net::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 my %_Type_Widths = (
     'bit'      => 1,
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Pin.pm 
new/Verilog-Perl-3.478/Netlist/Pin.pm
--- old/Verilog-Perl-3.476/Netlist/Pin.pm       2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Pin.pm       2021-06-06 15:44:13.000000000 
+0200
@@ -17,7 +17,7 @@
 @ISA = qw(Verilog::Netlist::Pin::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('_new_base',
        'Verilog::Netlist::Pin::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Port.pm 
new/Verilog-Perl-3.478/Netlist/Port.pm
--- old/Verilog-Perl-3.476/Netlist/Port.pm      2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Port.pm      2021-06-06 15:44:13.000000000 
+0200
@@ -11,7 +11,7 @@
 @ISA = qw(Verilog::Netlist::Port::Struct
        Verilog::Netlist::Subclass);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 structs('_new_base',
        'Verilog::Netlist::Port::Struct'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist/Subclass.pm 
new/Verilog-Perl-3.478/Netlist/Subclass.pm
--- old/Verilog-Perl-3.476/Netlist/Subclass.pm  2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Netlist/Subclass.pm  2021-06-06 15:44:13.000000000 
+0200
@@ -12,7 +12,7 @@
 use vars qw($VERSION @EXPORT);
 use strict;
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 @EXPORT = qw(structs);
 
 # Maybe in the future.  For now all users of this must do it themselves
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Netlist.pm 
new/Verilog-Perl-3.478/Netlist.pm
--- old/Verilog-Perl-3.476/Netlist.pm   2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/Netlist.pm   2021-06-06 15:44:13.000000000 +0200
@@ -14,7 +14,7 @@
 use strict;
 use vars qw($Debug $Verbose $VERSION);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 ######################################################################
 #### Error Handling
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Parser/Parser.pm 
new/Verilog-Perl-3.478/Parser/Parser.pm
--- old/Verilog-Perl-3.476/Parser/Parser.pm     2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Parser/Parser.pm     2021-06-06 15:44:13.000000000 
+0200
@@ -14,7 +14,7 @@
 use strict;
 use vars qw($VERSION $Debug);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 #$Debug sets the default value for debug.  You're better off with the object 
method though.
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Parser/SigParser.pm 
new/Verilog-Perl-3.478/Parser/SigParser.pm
--- old/Verilog-Perl-3.476/Parser/SigParser.pm  2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Parser/SigParser.pm  2021-06-06 15:44:13.000000000 
+0200
@@ -14,7 +14,7 @@
 ######################################################################
 #### Configuration Section
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 our @_Callback_Names = qw(
   attribute
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Parser/bisonpre 
new/Verilog-Perl-3.478/Parser/bisonpre
--- old/Verilog-Perl-3.476/Parser/bisonpre      2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Parser/bisonpre      2021-06-06 15:44:13.000000000 
+0200
@@ -9,7 +9,7 @@
 use strict;
 use vars qw($Debug $VERSION);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 our $Self;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Parser/callbackgen 
new/Verilog-Perl-3.478/Parser/callbackgen
--- old/Verilog-Perl-3.476/Parser/callbackgen   2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Parser/callbackgen   2021-06-06 15:44:13.000000000 
+0200
@@ -14,7 +14,7 @@
 require "../Language.pm";
 package main;
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 # xs_manual=>1,   -> The .xs file makes the handler itself
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Parser/gen/bisonpre-0 
new/Verilog-Perl-3.478/Parser/gen/bisonpre-0
--- old/Verilog-Perl-3.476/Parser/gen/bisonpre-0        2021-04-13 
21:58:44.000000000 +0200
+++ new/Verilog-Perl-3.478/Parser/gen/bisonpre-0        2021-06-06 
15:44:29.000000000 +0200
@@ -1 +1 @@
-nN99svgo4IhiI5h5uKLHx0lAnTk
\ No newline at end of file
+rOgzyFFyEDmYbUlvc2oclTtOb2w
\ No newline at end of file
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Preproc/Preproc.pm 
new/Verilog-Perl-3.478/Preproc/Preproc.pm
--- old/Verilog-Perl-3.476/Preproc/Preproc.pm   2021-04-13 21:58:16.000000000 
+0200
+++ new/Verilog-Perl-3.478/Preproc/Preproc.pm   2021-06-06 15:44:13.000000000 
+0200
@@ -11,7 +11,7 @@
 use strict;
 use vars qw($VERSION);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 ######################################################################
 #### Configuration Section
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/Std.pm 
new/Verilog-Perl-3.478/Std.pm
--- old/Verilog-Perl-3.476/Std.pm       2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/Std.pm       2021-06-06 15:44:13.000000000 +0200
@@ -14,7 +14,7 @@
 ######################################################################
 #### Configuration Section
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 #######################################################################
 # It's a PITRA to have pure datafiles get installed properly, so we have
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/vhier new/Verilog-Perl-3.478/vhier
--- old/Verilog-Perl-3.476/vhier        2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/vhier        2021-06-06 15:44:13.000000000 +0200
@@ -17,7 +17,7 @@
 use strict;
 use vars qw($Debug $VERSION);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 ######################################################################
 # main
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/vpassert 
new/Verilog-Perl-3.478/vpassert
--- old/Verilog-Perl-3.476/vpassert     2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/vpassert     2021-06-06 15:44:13.000000000 +0200
@@ -36,7 +36,7 @@
             %Files %Files_Read
             %File_Dest
             );
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 ######################################################################
 # configuration
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/vppreproc 
new/Verilog-Perl-3.478/vppreproc
--- old/Verilog-Perl-3.476/vppreproc    2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/vppreproc    2021-06-06 15:44:13.000000000 +0200
@@ -16,7 +16,7 @@
 use strict;
 use vars qw($Debug $VERSION);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 ######################################################################
 # main
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Verilog-Perl-3.476/vrename 
new/Verilog-Perl-3.478/vrename
--- old/Verilog-Perl-3.476/vrename      2021-04-13 21:58:16.000000000 +0200
+++ new/Verilog-Perl-3.478/vrename      2021-06-06 15:44:13.000000000 +0200
@@ -23,7 +23,7 @@
            $Debug $Opt_Xref $Opt_Crypt $Opt_Crypt_All $Opt_Write $Opt_Keywords
            @Files);
 
-$VERSION = '3.476';
+$VERSION = '3.478';
 
 ######################################################################
 

Reply via email to