Update of /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Constants/t
In directory 
sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32576/Win32-GUI-Constants/t

Modified Files:
        52_tags.t 98_pod.t 99_pod_coverage.t 
Log Message:
More Win32::GUI::Constants support

Index: 99_pod_coverage.t
===================================================================
RCS file: 
/cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Constants/t/99_pod_coverage.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 99_pod_coverage.t   13 May 2006 15:39:30 -0000      1.1
--- 99_pod_coverage.t   16 May 2006 18:57:26 -0000      1.2
***************
*** 13,17 ****
  eval "use Test::Pod::Coverage 1.04";
  plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" 
if $@;
! plan skip_all => "Pod Coverage tests for Win32::GUI::DropFiles done by core" 
if $ENV{W32G_CORE};
  
  plan tests => 2;
--- 13,17 ----
  eval "use Test::Pod::Coverage 1.04";
  plan skip_all => "Test::Pod::Coverage 1.04 required for testing POD coverage" 
if $@;
! plan skip_all => "Pod Coverage tests for Win32::GUI::Constants done by core" 
if $ENV{W32G_CORE};
  
  plan tests => 2;

Index: 52_tags.t
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Constants/t/52_tags.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 52_tags.t   13 May 2006 15:39:30 -0000      1.1
--- 52_tags.t   16 May 2006 18:57:26 -0000      1.2
***************
*** 158,162 ****
      LVS_EX_HIDELABELS LVS_EX_SINGLEROW LVS_EX_SNAPTOGRID LVS_EX_SIMPLESELECT 
LVIS_FOCUSED
      LVIS_SELECTED LVIS_CUT LVIS_DROPHILITED LVIS_GLOW LVIS_ACTIVATING 
LVIS_OVERLAYMASK
!     LVIS_STATEIMAGEMASK CLR_NONE ) ],
    mdi => [ qw(  ) ],
    menu => [
--- 158,163 ----
      LVS_EX_HIDELABELS LVS_EX_SINGLEROW LVS_EX_SNAPTOGRID LVS_EX_SIMPLESELECT 
LVIS_FOCUSED
      LVIS_SELECTED LVIS_CUT LVIS_DROPHILITED LVIS_GLOW LVIS_ACTIVATING 
LVIS_OVERLAYMASK
!     LVIS_STATEIMAGEMASK LVSIL_NORMAL LVSIL_SMALL LVSIL_STATE LVIR_BOUNDS 
LVIR_ICON
!     LVIR_LABEL LVIR_SELECTBOUNDS CLR_NONE ) ],
    mdi => [ qw(  ) ],
    menu => [
***************
*** 243,247 ****
  qw( CLR_DEFAULT TVGN_PREVIOUS TVGN_DROPHILITE TVGN_PREVIOUSVISIBLE TVGN_CHILD 
TVGN_ROOT
      TVGN_NEXTVISIBLE TVGN_PARENT TVGN_LASTVISIBLE TVGN_FIRSTVISIBLE TVGN_NEXT
!     TVGN_CARET ) ],
    updown => [ qw(  ) ],
    window => [
--- 244,250 ----
  qw( CLR_DEFAULT TVGN_PREVIOUS TVGN_DROPHILITE TVGN_PREVIOUSVISIBLE TVGN_CHILD 
TVGN_ROOT
      TVGN_NEXTVISIBLE TVGN_PARENT TVGN_LASTVISIBLE TVGN_FIRSTVISIBLE TVGN_NEXT
!     TVGN_CARET TVHT_NOWHERE TVHT_ONITEMICON TVHT_ONITEMLABEL TVHT_ONITEM
!     TVHT_ONITEMINDENT TVHT_ONITEMBUTTON TVHT_ONITEMRIGHT TVHT_ONITEMSTATEICON
!     TVHT_ABOVE TVHT_BELOW TVHT_TORIGHT TVHT_TOLEFT ) ],
    updown => [ qw(  ) ],
    window => [

Index: 98_pod.t
===================================================================
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Constants/t/98_pod.t,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 98_pod.t    13 May 2006 15:39:30 -0000      1.1
--- 98_pod.t    16 May 2006 18:57:26 -0000      1.2
***************
*** 13,16 ****
  eval "use Test::Pod 1.14";
  plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
! plan skip_all => "Pod tests for Win32::GUI::DropFiles done by core" if 
$ENV{W32G_CORE};
  all_pod_files_ok();
--- 13,16 ----
  eval "use Test::Pod 1.14";
  plan skip_all => "Test::Pod 1.14 required for testing POD" if $@;
! plan skip_all => "Pod tests for Win32::GUI::Constants done by core" if 
$ENV{W32G_CORE};
  all_pod_files_ok();


Reply via email to