Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Module::CoreList lists the Win32 module incorrectly #13787

Closed
p5pRT opened this issue Apr 30, 2014 · 4 comments
Closed

Module::CoreList lists the Win32 module incorrectly #13787

p5pRT opened this issue Apr 30, 2014 · 4 comments

Comments

@p5pRT
Copy link

p5pRT commented Apr 30, 2014

Migrated from rt.perl.org#121770 (status was 'resolved')

Searchable as RT121770$

@p5pRT
Copy link
Author

p5pRT commented Apr 30, 2014

From @steve-m-hay

Created by shay@MELMOTH

Module​::CoreList->first_release('Win32') returns 5.008007, but the Win32 module
first appeared in 5.008004​:

https://metacpan.org/source/NWCLARK/perl-5.8.3/win32
http​://perl5.git.perl.org/perl.git/commit/b4ad57f4f7fe2aca6dc52ea357ce9be7a7d38769
https://metacpan.org/source/NWCLARK/perl-5.8.4/win32/ext/Win32

Perl Info

Flags:
    category=library
    severity=low
    module=Module::CoreList

Site configuration information for perl 5.19.12:

Configured by shay at Wed Apr 30 12:49:54 2014.

Summary of my perl5 (revision 5 version 19 subversion 12) configuration:
  Commit id: adc2d0c9de764f1cb892860df8ecc93dc8909b39
  Platform:
    osname=MSWin32, osvers=6.1, archname=MSWin32-x86-multi-thread
    uname=''
    config_args='undef'
    hint=recommended, useposix=true, d_sigaction=undef
    useithreads=define, usemultiplicity=define
    use64bitint=undef, use64bitall=undef, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cl', ccflags ='-nologo -GF -W3 -Od -MD -Zi -DDEBUGGING -DWIN32
-D_CONSOLE -DNO_STRICT -D_CRT_SECURE_NO_DEPRECATE
-D_CRT_NONSTDC_NO_DEPRECATE  -DPERL_TEXTMODE_SCRIPTS
-DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO',
    optimize='-Od -MD -Zi -DDEBUGGING',
    cppflags='-DWIN32'
    ccversion='16.00.40219.01', gccversion='', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=8
    ivtype='long', ivsize=4, nvtype='double', nvsize=8,
Off_t='__int64', lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='link', ldflags ='-nologo -nodefaultlib -debug
-libpath:"C:\Dev\Temp\perl51912d\lib\CORE"  -machine:x86
"/manifestdependency:type='Win32'
name='Microsoft.Windows.Common-Controls' version='6.0.0.0'
processorArchitecture='*' publicKeyToken='6595b64144ccf1df'
language='*'"'
    libpth=\lib
    libs=oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib
comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib
netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib  version.lib
odbc32.lib odbccp32.lib comctl32.lib msvcrt.lib
    perllibs=oldnames.lib kernel32.lib user32.lib gdi32.lib
winspool.lib  comdlg32.lib advapi32.lib shell32.lib ole32.lib
oleaut32.lib  netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib
version.lib odbc32.lib odbccp32.lib comctl32.lib msvcrt.lib
    libc=msvcrt.lib, so=dll, useshrplib=true, libperl=perl519.lib
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
    cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -debug
-libpath:"C:\Dev\Temp\perl51912d\lib\CORE"  -machine:x86
"/manifestdependency:type='Win32'
name='Microsoft.Windows.Common-Controls' version='6.0.0.0'
processorArchitecture='*' publicKeyToken='6595b64144ccf1df'
language='*'"'



@INC for perl 5.19.12:
    C:/Dev/Temp/perl51912d/site/lib
    C:/Dev/Temp/perl51912d/lib
    .


Environment for perl 5.19.12:
    HOME (unset)
    LANG (unset)
    LANGUAGE (unset)
    LD_LIBRARY_PATH (unset)
    LOGDIR (unset)
    PATH=C:\Windows\system32;C:\Windows;C:\Windows\system32\wbem;C:\Dev\Temp\perl51912d\bin
    PERL_BADLANG (unset)
    SHELL (unset)

@p5pRT
Copy link
Author

p5pRT commented Sep 3, 2017

From @jkeenan

This problem was resolved the day it was reported, but the ticket was never closed.

#####
$ git show 70c5bd9
commit 70c5bd9
Author​: Chris 'BinGOs' Williams <chris@​bingosnet.co.uk>
Date​: Wed Apr 30 20​:23​:04 2014 +0100

  Resolve [perl #121770] Win32 did indeed ship with v5.8.3

Inline Patch
diff --git a/dist/Module-CoreList/lib/Module/CoreList.pm b/dist/Module-CoreList/lib/Module/CoreList.pm
index 5b65346..cab55e1 100644
--- a/dist/Module-CoreList/lib/Module/CoreList.pm
+++ b/dist/Module-CoreList/lib/Module/CoreList.pm
@@ -1709,6 +1709,7 @@ for my $version ( sort { $a <=> $b } keys %released ) {
             'Time::HiRes'           => '1.59',
             'Unicode'               => '4.0.1',
             'Unicode::UCD'          => '0.22',
+            'Win32'                 => '0.23',
             'base'                  => '2.05',
             'bigint'                => '0.05',
             'bignum'                => '0.15',
#####

#####
$ perl -v | head -2 | tail -1
This is perl 5, version 20, subversion 1 (v5.20.1) built for x86_64-linux

$ perl -MModule​::CoreList -E 'say Module​::CoreList->first_release('Win32');'
5.008004
#####

Marking ticket Resolved.

--
James E Keenan (jkeenan@​cpan.org)

@p5pRT
Copy link
Author

p5pRT commented Sep 3, 2017

The RT System itself - Status changed from 'new' to 'open'

@p5pRT
Copy link
Author

p5pRT commented Sep 3, 2017

@jkeenan - Status changed from 'open' to 'resolved'

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Projects
None yet
Development

No branches or pull requests

1 participant