You can subscribe to this list here.
2004 |
Jan
|
Feb
|
Mar
|
Apr
(3) |
May
(11) |
Jun
(2) |
Jul
(35) |
Aug
(2) |
Sep
|
Oct
|
Nov
(9) |
Dec
(2) |
---|---|---|---|---|---|---|---|---|---|---|---|---|
2005 |
Jan
|
Feb
(4) |
Mar
|
Apr
(1) |
May
(3) |
Jun
|
Jul
|
Aug
|
Sep
(8) |
Oct
(4) |
Nov
(2) |
Dec
|
2007 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(24) |
Nov
|
Dec
(4) |
2008 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(6) |
Nov
|
Dec
|
2009 |
Jan
|
Feb
|
Mar
(1) |
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
(1) |
Oct
(2) |
Nov
|
Dec
|
2010 |
Jan
|
Feb
|
Mar
|
Apr
|
May
(1) |
Jun
(3) |
Jul
(3) |
Aug
|
Sep
|
Oct
(5) |
Nov
(2) |
Dec
|
2011 |
Jan
(1) |
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
From: Dmitry K. <in...@us...> - 2011-01-19 15:00:49
|
Update of /cvsroot/winguitest/Win32-GuiTest/Recorder In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv27662 Modified Files: README.txt Log Message: #64916: document cvs repository for Recorder/Win32GuiTest.exe Index: README.txt =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/Recorder/README.txt,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** README.txt 3 Feb 2005 01:02:18 -0000 1.3 --- README.txt 19 Jan 2011 15:00:41 -0000 1.4 *************** *** 4,11 **** Win32::GuiTest (1.50.x-ad and greater). ! Updates, source, and general information regarding this product are currently available at: http://sourceforge.net/projects/winguitest Also, you should read the application's About Box; which can be found in its system menu. --- 4,14 ---- Win32::GuiTest (1.50.x-ad and greater). ! Updates and general information regarding this product are currently available at: http://sourceforge.net/projects/winguitest + Source is available at: + http://winguitest.cvs.sourceforge.net/viewvc/winguitest/Win32-GuiTest%20Recorder/ + Also, you should read the application's About Box; which can be found in its system menu. |
From: Dmitry K. <in...@us...> - 2010-11-25 10:33:19
|
Update of /cvsroot/winguitest/Win32-GuiTest/t In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv20828/t Modified Files: 02_calc.t Log Message: - (bug #63310) fail early if cannot switch to scientific mode Index: 02_calc.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/02_calc.t,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** 02_calc.t 13 Jun 2010 18:45:09 -0000 1.5 --- 02_calc.t 25 Nov 2010 10:33:11 -0000 1.6 *************** *** 61,71 **** #Find the Hex radio button ! my $hex; ! SKIP: { ! ($hex) = FindWindowLike($calc, "Hex"); ! ok(defined $hex, "hex found") or skip "could not find Hex", 2; ! ok(IsWindow($hex), "Hex is a window"); ! ok(!IsCheckedButton($hex), "Hex is not checked"); } #Find the Bin, Oct and Dec radio buttons --- 61,73 ---- #Find the Hex radio button ! my ($hex) = FindWindowLike($calc, "Hex"); ! ok(defined $hex, "hex found") or skip "could not find Hex", 2; ! unless (defined $hex) { ! print STDERR "# couldn't switch to scientific mode!\n"; # see bug 63310 ! SendKeys("%{F4}"); ! exit; } + ok(IsWindow($hex), "Hex is a window"); + ok(!IsCheckedButton($hex), "Hex is not checked"); #Find the Bin, Oct and Dec radio buttons |
From: Dmitry K. <in...@us...> - 2010-11-24 19:55:16
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv13434 Modified Files: GuiTest.xs Log Message: - remove compat #defines for VC5 (bug #63309) - hush some warnings from newer gcc Index: GuiTest.xs =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/GuiTest.xs,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** GuiTest.xs 31 Oct 2010 19:04:41 -0000 1.5 --- GuiTest.xs 24 Nov 2010 19:55:08 -0000 1.6 *************** *** 16,24 **** #define WIN32_LEAN_AND_MEAN #define _WIN32_IE 0x0500 - #ifndef SIZE_T - # ifndef __GNUC__ - # define SIZE_T DWORD - # endif - #endif #include <windows.h> #include <commctrl.h> --- 16,19 ---- *************** *** 321,325 **** // Sets up the hook, global control/hook handles, and registers appropriate // window message. ! HHOOK SetHook(HWND hWnd, UINT &uMsg, char *lpMsgId) { g_hWnd = hWnd; --- 316,320 ---- // Sets up the hook, global control/hook handles, and registers appropriate // window message. ! HHOOK SetHook(HWND hWnd, UINT &uMsg, const char *lpMsgId) { g_hWnd = hWnd; |
From: Dmitry K. <in...@us...> - 2010-10-31 19:06:59
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv14707 Modified Files: CHANGES Log Message: - version 1.58 Index: CHANGES =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/CHANGES,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** CHANGES 30 Jul 2010 18:15:20 -0000 1.4 --- CHANGES 31 Oct 2010 19:06:51 -0000 1.5 *************** *** 306,309 **** - Build on strawberry perl ! 1.58 - Build on x64 systems --- 306,310 ---- - Build on strawberry perl ! 1.58 Oct 31 2010 - Build on x64 systems + - Hooks fix by Oleg Prokhorov |
From: Dmitry K. <in...@us...> - 2010-10-31 19:06:59
|
Update of /cvsroot/winguitest/Win32-GuiTest/lib/Win32 In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv14707/lib/Win32 Modified Files: GuiTest.pm Log Message: - version 1.58 Index: GuiTest.pm =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/lib/Win32/GuiTest.pm,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** GuiTest.pm 13 Jun 2010 18:42:19 -0000 1.6 --- GuiTest.pm 31 Oct 2010 19:06:51 -0000 1.7 *************** *** 243,247 **** $EXPORT_TAGS{ALL}= \@EXPORT_OK; ! $VERSION = '1.57'; $debug = 0; --- 243,247 ---- $EXPORT_TAGS{ALL}= \@EXPORT_OK; ! $VERSION = '1.58'; $debug = 0; |
From: Dmitry K. <in...@us...> - 2010-10-31 19:04:48
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv13934 Modified Files: GuiTest.xs Log Message: bug #62530: patch by Oleg Prokhorov: Hooks support is broken Index: GuiTest.xs =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/GuiTest.xs,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** GuiTest.xs 30 Jul 2010 18:09:51 -0000 1.4 --- GuiTest.xs 31 Oct 2010 19:04:41 -0000 1.5 *************** *** 41,67 **** HINSTANCE g_hDLL = NULL; #pragma data_seg(".shared") // Used by hooking/injected routines ! HWND g_hWnd = 0; ! HHOOK g_hHook = NULL; ! HWND g_popup = 0; //Hold's popup menu's handle ! BOOL g_bRetVal = 0; ! char g_szBuffer[MAX_DATA_BUF+1] = {NUL}; ! UINT WM_LV_GETTEXT = 0; ! UINT WM_LV_SELBYINDEX = 0; ! UINT WM_LV_SELBYTEXT = 0; ! UINT WM_LV_ISSEL = 0; ! UINT WM_TC_GETTEXT = 0; ! UINT WM_TC_SELBYINDEX = 0; ! UINT WM_TC_SELBYTEXT = 0; ! UINT WM_TC_ISSEL = 0; ! UINT WM_TV_SELBYPATH = 0; ! UINT WM_TV_GETSELPATH = 0; ! UINT WM_INITMENUPOPUPX = WM_INITMENUPOPUP; //Only needed to conform with SetHook()'s calling convention ! BOOL unicode_semantics = 0; #pragma data_seg() #pragma comment(linker, "/SECTION:.shared,RWS") ! BOOL APIENTRY DllMain(HANDLE hModule, DWORD ul_reason_for_call, LPVOID lpReserved) { --- 41,73 ---- HINSTANCE g_hDLL = NULL; + #if defined (__GNUC__) + #define SHARED_ATTR __attribute__((section ("shared_seg"), shared)) + #else + #define SHARED_ATTR + #endif + #pragma data_seg(".shared") // Used by hooking/injected routines ! HWND g_hWnd SHARED_ATTR = 0; ! HHOOK g_hHook SHARED_ATTR = NULL; ! HWND g_popup SHARED_ATTR = 0; //Hold's popup menu's handle ! BOOL g_bRetVal SHARED_ATTR = 0; ! char g_szBuffer[MAX_DATA_BUF+1] SHARED_ATTR = {NUL}; ! UINT WM_LV_GETTEXT SHARED_ATTR = 0; ! UINT WM_LV_SELBYINDEX SHARED_ATTR = 0; ! UINT WM_LV_SELBYTEXT SHARED_ATTR = 0; ! UINT WM_LV_ISSEL SHARED_ATTR = 0; ! UINT WM_TC_GETTEXT SHARED_ATTR = 0; ! UINT WM_TC_SELBYINDEX SHARED_ATTR = 0; ! UINT WM_TC_SELBYTEXT SHARED_ATTR = 0; ! UINT WM_TC_ISSEL SHARED_ATTR = 0; ! UINT WM_TV_SELBYPATH SHARED_ATTR = 0; ! UINT WM_TV_GETSELPATH SHARED_ATTR = 0; ! UINT WM_INITMENUPOPUPX SHARED_ATTR = WM_INITMENUPOPUP; //Only needed to conform with SetHook()'s calling convention ! BOOL unicode_semantics SHARED_ATTR = 0; #pragma data_seg() #pragma comment(linker, "/SECTION:.shared,RWS") ! extern "C" BOOL WINAPI DllMain(HANDLE hModule, DWORD ul_reason_for_call, LPVOID lpReserved) { |
From: Dmitry K. <in...@us...> - 2010-10-31 16:30:45
|
Update of /cvsroot/winguitest/Win32-GuiTest/lib/Win32/GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv15954/lib/Win32/GuiTest Modified Files: Examples.pm Log Message: - convert files from dos to unix format Index: Examples.pm =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/lib/Win32/GuiTest/Examples.pm,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** Examples.pm 23 Oct 2007 12:18:37 -0000 1.1 --- Examples.pm 31 Oct 2010 16:30:37 -0000 1.2 *************** *** 1,711 **** ! package Win32::GuiTest::Examples; ! 1; ! ! =head1 NAME ! ! Win32::GuiTest::Examples - collection of the scripts from eg ! ! =head1 Synopsis ! ! This module was autogenerated from the files in the eg directory of [...1872 lines suppressed...] ! $info = $info . "# Window Rect: ($left, $top) - ($right, $bottom)\r\n"; ! print "Text: " . WMGetText($hwnd) . "\r\n"; ! return($info); ! } ! ! sub DispWindowInfo { ! print shift; ! return; ! } ! ! sub DispMenu { ! print "\n\nPress <INSERT> to copy window text to clipboard.\n"; ! print "Press <ESCAPE> to exit program.\n"; ! return; ! } ! ! ! ! =cut ! |
From: Dmitry K. <in...@us...> - 2010-10-31 16:30:45
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv15954 Modified Files: README Log Message: - convert files from dos to unix format Index: README =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/README,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** README 23 Oct 2007 12:03:41 -0000 1.1 --- README 31 Oct 2010 16:30:37 -0000 1.2 *************** *** 1,767 **** ! NAME ! Win32::GuiTest - Perl GUI Test Utilities. ! ! SYNOPSIS ! use Win32::GuiTest qw(FindWindowLike GetWindowText ! SetForegroundWindow SendKeys); ! ! $Win32::GuiTest::debug = 0; # Set to "1" to enable verbose mode ! ! my @windows = FindWindowLike(0, "^Microsoft Excel", "^XLMAIN\$"); [...1514 lines suppressed...] ! Dmitry Karasik (dm...@ka...) added support for unicode and ! cygwin/mingw. ! ! CREDITS ! Thanks very much to: ! ! Johannes Maehner ! Ben Shern ! Phill Wolf ! Mauro ! Sohrab Niramwalla ! Frank van Dijk ! Jarek Jurasz ! Wilson P. Snyder II ! Rudi Farkas ! Paul Covington ! Piotr Kaluski ! ...and more... ! for code, suggestions and bug fixes. ! |
From: Dmitry K. <in...@us...> - 2010-07-30 18:15:28
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv7795 Modified Files: CHANGES Log Message: - add lines for 1.57 and upcoming 1.58 Index: CHANGES =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/CHANGES,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** CHANGES 1 Oct 2008 11:32:45 -0000 1.3 --- CHANGES 30 Jul 2010 18:15:20 -0000 1.4 *************** *** 302,304 **** - Allow 'make dist' and limited 'make test' on non-Win32 platforms - Screen to mickey conversion patch by Tony Skelding ! --- 302,309 ---- - Allow 'make dist' and limited 'make test' on non-Win32 platforms - Screen to mickey conversion patch by Tony Skelding ! ! 1.57 Jun 13 2010 ! - Build on strawberry perl ! ! 1.58 ! - Build on x64 systems |
From: Dmitry K. <in...@us...> - 2010-07-30 18:10:00
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv6478 Modified Files: GuiTest.xs Log Message: fix bug #59838 : doesn't compile on x64 systems Index: GuiTest.xs =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/GuiTest.xs,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** GuiTest.xs 29 Jul 2010 20:14:53 -0000 1.3 --- GuiTest.xs 30 Jul 2010 18:09:51 -0000 1.4 *************** *** 17,21 **** #define _WIN32_IE 0x0500 #ifndef SIZE_T ! # define SIZE_T DWORD #endif #include <windows.h> --- 17,23 ---- #define _WIN32_IE 0x0500 #ifndef SIZE_T ! # ifndef __GNUC__ ! # define SIZE_T DWORD ! # endif #endif #include <windows.h> |
From: Dmitry K. <in...@us...> - 2010-07-29 20:15:01
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv22189 Modified Files: GuiTest.xs Log Message: - hush a warning on x64 Index: GuiTest.xs =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/GuiTest.xs,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** GuiTest.xs 1 Oct 2008 11:27:45 -0000 1.2 --- GuiTest.xs 29 Jul 2010 20:14:53 -0000 1.3 *************** *** 692,697 **** dw, lpMsgBuf ); }else{ ! XPUSHs( sv_2mortal( newSVuv( ( LONG )pBuffer ) ) ); ! XPUSHs( sv_2mortal( newSVuv( ( LONG )hProcess ) ) ); } --- 692,697 ---- dw, lpMsgBuf ); }else{ ! XPUSHs( sv_2mortal( newSVuv( ( UV )pBuffer ) ) ); ! XPUSHs( sv_2mortal( newSVuv( ( UV )hProcess ) ) ); } |
From: Dmitry K. <in...@us...> - 2010-06-13 18:45:18
|
Update of /cvsroot/winguitest/Win32-GuiTest/t In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv21602/t Modified Files: 01_basic.t 02_calc.t Log Message: - Bug #50808: Pre-existing Notepad, Calc windows will cause test failure Index: 02_calc.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/02_calc.t,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** 02_calc.t 13 Jun 2010 18:42:19 -0000 1.4 --- 02_calc.t 13 Jun 2010 18:45:09 -0000 1.5 *************** *** 15,18 **** --- 15,25 ---- my $desk = GetDesktopWindow(); + # Make sure there are no existing Calc windows to interfere with testing + { + my @calc_windows = FindWindowLike(0, "", "Calc"); + BAIL_OUT('Please close existing Calculator windows before proceeding') + if @calc_windows; + } + # It seems that if the calculator opens as Standard then even if we # select Scientific mode we cannot find the Hex button. Index: 01_basic.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/01_basic.t,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** 01_basic.t 13 Jun 2010 18:42:19 -0000 1.3 --- 01_basic.t 13 Jun 2010 18:45:09 -0000 1.4 *************** *** 33,36 **** --- 33,43 ---- ok(! @desks, "The desktop is not on the window list"); + # Make sure there are no existing Notepad windows to interfere with testing + { + my @notepad_windows = FindWindowLike(0, "", "Notepad"); + BAIL_OUT('Please close existing Notepad windows before proceeding') + if @notepad_windows; + } + # Create a notepad window and check we can find it system("cmd /c start notepad.exe README"); |
From: Dmitry K. <in...@us...> - 2010-06-13 18:42:28
|
Update of /cvsroot/winguitest/Win32-GuiTest/lib/Win32 In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv20874/lib/Win32 Modified Files: GuiTest.pm Log Message: (bug #56282) apply patch from Michael Roberts to fix tests under Windows 7 Index: GuiTest.pm =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/lib/Win32/GuiTest.pm,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** GuiTest.pm 1 Oct 2008 11:32:45 -0000 1.5 --- GuiTest.pm 13 Jun 2010 18:42:19 -0000 1.6 *************** *** 243,247 **** $EXPORT_TAGS{ALL}= \@EXPORT_OK; ! $VERSION = '1.56'; $debug = 0; --- 243,247 ---- $EXPORT_TAGS{ALL}= \@EXPORT_OK; ! $VERSION = '1.57'; $debug = 0; |
From: Dmitry K. <in...@us...> - 2010-06-13 18:42:27
|
Update of /cvsroot/winguitest/Win32-GuiTest/t In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv20874/t Modified Files: 01_basic.t 02_calc.t Log Message: (bug #56282) apply patch from Michael Roberts to fix tests under Windows 7 Index: 02_calc.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/02_calc.t,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** 02_calc.t 28 Mar 2009 22:36:34 -0000 1.3 --- 02_calc.t 13 Jun 2010 18:42:19 -0000 1.4 *************** *** 24,34 **** { system("cmd /c start calc"); ! my ($calc) = WaitWindowLike($desk, undef, "^SciCalc\$"); # hmm, It seems the SciCalc is the name of the class for both the Standard and the # Scientific version of the calculator ! ok(IsWindow($calc)); SetForegroundWindow($calc); MenuSelect("&View|&Scientific"); SendKeys("%{F4}"); --- 24,40 ---- { system("cmd /c start calc"); ! my ($calc) = WaitWindowLike($desk, undef, "^SciCalc\$|^CalcFrame"); # hmm, It seems the SciCalc is the name of the class for both the Standard and the # Scientific version of the calculator ! ok(IsWindow($calc)); SetForegroundWindow($calc); + if (GetClassName($calc) eq "CalcFrame") { + print STDERR "# Windows 7 calculator is toooo weird!\n"; + SendKeys("%{F4}"); + exit; + } + MenuSelect("&View|&Scientific"); SendKeys("%{F4}"); *************** *** 36,40 **** system("cmd /c start calc"); ! my ($calc) = WaitWindowLike($desk, undef, "^SciCalc\$"); SendKeys("1969"); --- 42,46 ---- system("cmd /c start calc"); ! my ($calc) = WaitWindowLike($desk, undef, "^SciCalc\$|^CalcFrame"); SendKeys("1969"); Index: 01_basic.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/01_basic.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 01_basic.t 1 Oct 2008 11:10:12 -0000 1.2 --- 01_basic.t 13 Jun 2010 18:42:19 -0000 1.3 *************** *** 69,72 **** --- 69,73 ---- is($waitwin[0], $windows[0], "WindowIDs are identical"); + SetForegroundWindow($windows[0]); SendKeys(<<EOM, 10); This is a test message, |
From: Dmitry K. <in...@us...> - 2010-05-27 13:31:34
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory sfp-cvsdas-4.v30.ch3.sourceforge.com:/tmp/cvs-serv20595 Modified Files: Makefile.PL Log Message: - adapted to latest cygwin with gcc 4 Index: Makefile.PL =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/Makefile.PL,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** Makefile.PL 19 Oct 2009 16:04:15 -0000 1.3 --- Makefile.PL 27 May 2010 13:31:25 -0000 1.4 *************** *** 4,7 **** --- 4,8 ---- # + use Config; use ExtUtils::MakeMaker; *************** *** 28,33 **** ) : ()), (( $^O =~ /cygwin/i) ? ( LD => 'g++', ! LDDLFLAGS => '-shared', LIBS => ['-L/usr/lib/w32api -lgdi32'], ) : ()), --- 29,35 ---- ) : ()), (( $^O =~ /cygwin/i) ? ( + CC => 'g++', LD => 'g++', ! LDDLFLAGS => "-shared $Config{ccflags}", LIBS => ['-L/usr/lib/w32api -lgdi32'], ) : ()), |
From: Dmitry K. <in...@us...> - 2009-10-19 16:04:33
|
Update of /cvsroot/winguitest/Win32-GuiTest/eg In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv19058/eg Added Files: make_eg.pl Log Message: (bug #50642) make_eg.pl gets installed into site/lib/Win32/make_eg.pl --- NEW FILE: make_eg.pl --- #!perl -w use strict; # this script was included in the makedist.pl to generate the Examples.pm file # every time building a new distribtion. # We should also make sure the file is included in the distribution and # installed on the target machines. # Written by Gabor Szabo <ga...@pt...> open my $out, ">lib/Win32/GuiTest/Examples.pm" or die "Cannot open lib/Win32/GuiTest/Examples.pm:$!\n"; print $out <<END; package Win32::GuiTest::Examples; 1; =head1 NAME Win32::GuiTest::Examples - collection of the scripts from eg =head1 Synopsis This module was autogenerated from the files in the eg directory of the distribution. For detailed (cough) documenataion see L<Win32::GuiTest>. To run the examples either copy-paste them from here or download and unpack the distribution and take the files from the eg directory. =head1 Examples END open(MAN, "<MANIFEST"); my @manifest = <MAN>; close(MAN); foreach my $file (@manifest) { chomp $file; next if $file !~ m{eg/(.*)\.pl}; next if $1 eq 'make_eg'; print $out "\n=head2 $file\n\n"; open my $fh, "<", $file; my @lines = <$fh>; for ( @lines) { next if /^#\s*\$Id/; print $out " $_"; } } print $out <<END; =cut END |
From: Dmitry K. <in...@us...> - 2009-10-19 16:04:29
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv19058 Modified Files: MANIFEST Makefile.PL makedist.pl Removed Files: make_eg.pl Log Message: (bug #50642) make_eg.pl gets installed into site/lib/Win32/make_eg.pl Index: MANIFEST =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/MANIFEST,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** MANIFEST 1 Oct 2008 11:10:12 -0000 1.4 --- MANIFEST 19 Oct 2009 16:04:14 -0000 1.5 *************** *** 49,52 **** t/99_pod_coverage.t typemap ! make_eg.pl ! META.yml Module meta-data (added by MakeMaker) --- 49,53 ---- t/99_pod_coverage.t typemap ! eg/make_eg.pl ! META.yml Module meta-data (added by MakeMaker) ! --- make_eg.pl DELETED --- Index: Makefile.PL =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/Makefile.PL,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** Makefile.PL 1 Oct 2008 11:10:12 -0000 1.2 --- Makefile.PL 19 Oct 2009 16:04:15 -0000 1.3 *************** *** 55,59 **** my_create_predist: ! $(PERL) make_eg.pl @pod2text lib/Win32/GuiTest.pm > README '; --- 55,59 ---- my_create_predist: ! $(PERL) eg/make_eg.pl @pod2text lib/Win32/GuiTest.pm > README '; Index: makedist.pl =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/makedist.pl,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** makedist.pl 21 Jul 2004 22:21:46 -0000 1.4 --- makedist.pl 19 Oct 2009 16:04:15 -0000 1.5 *************** *** 18,22 **** unlink("makedist.log"); sys("nmake clean") if -e "makefile"; ! sys("perl make_eg.pl"); sys("perl makefile.pl"); sys("nmake"); --- 18,22 ---- unlink("makedist.log"); sys("nmake clean") if -e "makefile"; ! sys("perl eg/make_eg.pl"); sys("perl makefile.pl"); sys("nmake"); |
From: Dmitry K. <in...@us...> - 2009-09-25 15:33:38
|
Update of /cvsroot/winguitest/Win32-GuiTest/t In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv21403 Modified Files: 05_which.t Log Message: https://rt.cpan.org/Public/Bug/Display.html?id=50021 'progman' does not exist in Windows Vista don't check for progman.exe at all Index: 05_which.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/05_which.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 05_which.t 1 Oct 2008 11:10:12 -0000 1.2 --- 05_which.t 25 Sep 2009 15:33:21 -0000 1.3 *************** *** 19,23 **** # like(WhichExe("winfile"), qr/winfile/i, "winfile"); - like(WhichExe("progman"), qr/progman/i, "progman"); like(WhichExe("explorer"), qr/explorer/i, "explorer"); --- 19,22 ---- |
From: Dmitry K. <in...@us...> - 2009-03-28 22:36:39
|
Update of /cvsroot/winguitest/Win32-GuiTest/t In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv16292/t Modified Files: 02_calc.t Log Message: - fix bug #44643 "Decimal symbol" in locale can make test failure Index: 02_calc.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/02_calc.t,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** 02_calc.t 1 Oct 2008 11:10:12 -0000 1.2 --- 02_calc.t 28 Mar 2009 22:36:34 -0000 1.3 *************** *** 44,48 **** ok(defined $edit, "found editor") or skip "could not find Edit window", 1; ok(IsWindow($edit), "Editor is a window"); ! is(WMGetText($edit), "1969. ", "1969 found"); } --- 44,48 ---- ok(defined $edit, "found editor") or skip "could not find Edit window", 1; ok(IsWindow($edit), "Editor is a window"); ! ok(WMGetText($edit) =~ /^1969. $/, "1969 found"); } *************** *** 96,100 **** skip "No Dec/bin/Oct/Hex button(s)", 9 if not ($dec and $bin and $oct and $hex); PushButton("Dec"); sleep 1; ! is(WMGetText($edit), "1969. ", "1969 in dec found"); ok(IsCheckedButton($dec)); --- 96,100 ---- skip "No Dec/bin/Oct/Hex button(s)", 9 if not ($dec and $bin and $oct and $hex); PushButton("Dec"); sleep 1; ! ok(WMGetText($edit) =~ /^1969. $/, "1969 found"); ok(IsCheckedButton($dec)); |
From: Dmitry K. <in...@us...> - 2008-10-01 11:32:57
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv16175 Modified Files: CHANGES Log Message: - 1.56 release candidate Index: CHANGES =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/CHANGES,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** CHANGES 15 Dec 2007 21:45:54 -0000 1.2 --- CHANGES 1 Oct 2008 11:32:45 -0000 1.3 *************** *** 294,299 **** --- 294,304 ---- - SendKeys rewritten in Perl to allow more powerful grouping and to understand unicode. + 1.55 Tue Dec 15 22:00 CEST 2007 - First attempts to make Win32::GuiTest object oriented. FindWindowLike modified (changes are backward compatible) + + 1.56 Wed Oct 1 13:28:34 CEST 2008 + - Allow 'make dist' and limited 'make test' on non-Win32 platforms + - Screen to mickey conversion patch by Tony Skelding |
From: Dmitry K. <in...@us...> - 2008-10-01 11:32:56
|
Update of /cvsroot/winguitest/Win32-GuiTest/lib/Win32 In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv16175/lib/Win32 Modified Files: GuiTest.pm Log Message: - 1.56 release candidate Index: GuiTest.pm =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/lib/Win32/GuiTest.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** GuiTest.pm 1 Oct 2008 11:10:12 -0000 1.4 --- GuiTest.pm 1 Oct 2008 11:32:45 -0000 1.5 *************** *** 243,247 **** $EXPORT_TAGS{ALL}= \@EXPORT_OK; ! $VERSION = '1.55'; $debug = 0; --- 243,247 ---- $EXPORT_TAGS{ALL}= \@EXPORT_OK; ! $VERSION = '1.56'; $debug = 0; |
From: Dmitry K. <in...@us...> - 2008-10-01 11:27:58
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv13466 Modified Files: GuiTest.xs Log Message: - Screen <-> mickey conversion formula matched to the internal windows formula. Before, if ScreenToNorm(x,y) transformation was used to set mouse coordinates in mickeys, GetCursorPos() returned pixel values, that were sometimes not equal to (x,y). Index: GuiTest.xs =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/GuiTest.xs,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** GuiTest.xs 23 Oct 2007 11:38:02 -0000 1.1 --- GuiTest.xs 1 Oct 2008 11:27:45 -0000 1.2 *************** *** 566,573 **** */ void ScreenToMouseplane(POINT *p) { ! p->x = MulDiv(p->x, 0x10000, GetSystemMetrics(SM_CXSCREEN)); ! p->y = MulDiv(p->y, 0x10000, GetSystemMetrics(SM_CYSCREEN)); } --- 566,575 ---- */ + #define SCREEN_TO_MICKEY(COORD,val) MulDiv((val)+1, 0x10000, GetSystemMetrics(SM_C ## COORD ## SCREEN))-1 + void ScreenToMouseplane(POINT *p) { ! p->x = SCREEN_TO_MICKEY(X,p->x); ! p->y = SCREEN_TO_MICKEY(Y,p->y); } *************** *** 646,651 **** if (SetHook(hWnd, WM_INITMENUPOPUPX, "WM_INITMENUPOPUP_RM") == NULL) return 0; ! int mickey_x = MulDiv(x, 0x10000, GetSystemMetrics(SM_CXSCREEN)); ! int mickey_y = MulDiv(y, 0x10000, GetSystemMetrics(SM_CYSCREEN)); simple_mouse(MOUSEEVENTF_MOVE|MOUSEEVENTF_ABSOLUTE, mickey_x, mickey_y); simple_mouse(MOUSEEVENTF_RIGHTDOWN, 0, 0); --- 648,653 ---- if (SetHook(hWnd, WM_INITMENUPOPUPX, "WM_INITMENUPOPUP_RM") == NULL) return 0; ! int mickey_x = SCREEN_TO_MICKEY(X,x); ! int mickey_y = SCREEN_TO_MICKEY(Y,y); simple_mouse(MOUSEEVENTF_MOVE|MOUSEEVENTF_ABSOLUTE, mickey_x, mickey_y); simple_mouse(MOUSEEVENTF_RIGHTDOWN, 0, 0); *************** *** 970,975 **** int y; PREINIT: ! int mickey_x = MulDiv(x, 0x10000, GetSystemMetrics(SM_CXSCREEN)); ! int mickey_y = MulDiv(y, 0x10000, GetSystemMetrics(SM_CYSCREEN)); CODE: simple_mouse(MOUSEEVENTF_MOVE|MOUSEEVENTF_ABSOLUTE, mickey_x, mickey_y); --- 972,977 ---- int y; PREINIT: ! int mickey_x = SCREEN_TO_MICKEY(X,x); ! int mickey_y = SCREEN_TO_MICKEY(Y,y); CODE: simple_mouse(MOUSEEVENTF_MOVE|MOUSEEVENTF_ABSOLUTE, mickey_x, mickey_y); *************** *** 1340,1350 **** int x; int y; - PREINIT: - int hor,ver; PPCODE: ! hor = GetSystemMetrics(SM_CXSCREEN); ! ver = GetSystemMetrics(SM_CYSCREEN); ! x = MulDiv(x, 65536, hor); ! y = MulDiv(y, 65536, ver); XPUSHs(sv_2mortal(newSViv((IV)x))); XPUSHs(sv_2mortal(newSViv((IV)y))); --- 1342,1348 ---- int x; int y; PPCODE: ! x = SCREEN_TO_MICKEY(X,x); ! y = SCREEN_TO_MICKEY(Y,y); XPUSHs(sv_2mortal(newSViv((IV)x))); XPUSHs(sv_2mortal(newSViv((IV)y))); *************** *** 1355,1365 **** int x; int y; - PREINIT: - int hor,ver; PPCODE: ! hor = GetSystemMetrics(SM_CXSCREEN); ! ver = GetSystemMetrics(SM_CYSCREEN); ! x = MulDiv(x, hor, 65536); ! y = MulDiv(y, ver, 65536); XPUSHs(sv_2mortal(newSViv((IV)x))); XPUSHs(sv_2mortal(newSViv((IV)y))); --- 1353,1359 ---- int x; int y; PPCODE: ! x = MulDiv(x + 1, GetSystemMetrics(SM_CXSCREEN), 65536) - 1; ! y = MulDiv(y + 1, GetSystemMetrics(SM_CYSCREEN), 65536) - 1; XPUSHs(sv_2mortal(newSViv((IV)x))); XPUSHs(sv_2mortal(newSViv((IV)y))); |
From: Dmitry K. <in...@us...> - 2008-10-01 11:10:28
|
Update of /cvsroot/winguitest/Win32-GuiTest/lib/Win32 In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv20994/lib/Win32 Modified Files: GuiTest.pm Log Message: - incorporate minor changes accumulated in 1.54 @ CPAN Index: GuiTest.pm =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/lib/Win32/GuiTest.pm,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** GuiTest.pm 15 Dec 2007 21:43:45 -0000 1.3 --- GuiTest.pm 1 Oct 2008 11:10:12 -0000 1.4 *************** *** 95,99 **** require Exporter; require DynaLoader; - require AutoLoader; @ISA = qw(Exporter DynaLoader); --- 95,98 ---- *************** *** 646,650 **** my $oo_mode = 0; # Object oriented mode ! if( $_[ 0 ] eq "Win32::GuiTest" ) # Object { shift(@_); --- 645,649 ---- my $oo_mode = 0; # Object oriented mode ! if( defined($_[0]) and $_[ 0 ] eq "Win32::GuiTest" ) # Object { shift(@_); *************** *** 656,660 **** $maxlevel = $arg{ '-maxlevel' }; $oo_mode = 1; ! }elsif( ref( $_[ 0 ] eq "Win32::GuiTest::Window" ) ) # Object { shift(@_); --- 655,659 ---- $maxlevel = $arg{ '-maxlevel' }; $oo_mode = 1; ! }elsif( defined($_[0]) and ref( $_[ 0 ] eq "Win32::GuiTest::Window" ) ) # Object { shift(@_); *************** *** 1694,1701 **** - # Preloaded methods go here. - - # Autoload methods go after =cut, and are processed by the autosplit program. - package Win32::GuiTest::Window; --- 1693,1696 ---- *************** *** 1767,1770 **** --- 1762,1775 ---- See more detailed explanations here http://sourceforge.net/projects/winguitest/ + =head2 cygwin + + g++ needs to be installed + + perl Makefile.PL + make + make test + make install + + =head2 MSVC environment To setup a development environment for compiling the C++ code you can either buy |
From: Dmitry K. <in...@us...> - 2008-10-01 11:10:27
|
Update of /cvsroot/winguitest/Win32-GuiTest/t In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv20994/t Modified Files: 01_basic.t 02_calc.t 03_cpl.t 04_std.t 05_which.t 06_sendkeys.t Log Message: - incorporate minor changes accumulated in 1.54 @ CPAN Index: 05_which.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/05_which.t,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 05_which.t 23 Oct 2007 12:22:48 -0000 1.1 --- 05_which.t 1 Oct 2008 11:10:12 -0000 1.2 *************** *** 1,4 **** #!perl -w ! BEGIN { $| = 1; } # $Id$ --- 1,7 ---- #!perl -w ! BEGIN { ! print "1..0 # Skip win32 required\n" and exit unless $^O =~ /win32|cygwin/i; ! $| = 1; ! } # $Id$ Index: 03_cpl.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/03_cpl.t,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 03_cpl.t 23 Oct 2007 12:22:48 -0000 1.1 --- 03_cpl.t 1 Oct 2008 11:10:12 -0000 1.2 *************** *** 1,4 **** #!perl -w ! BEGIN { $| = 1; } # $Id$ --- 1,7 ---- #!perl -w ! BEGIN { ! print "1..0 # Skip win32 required\n" and exit unless $^O =~ /win32|cygwin/i; ! $| = 1; ! } # $Id$ Index: 06_sendkeys.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/06_sendkeys.t,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 06_sendkeys.t 23 Oct 2007 12:22:48 -0000 1.1 --- 06_sendkeys.t 1 Oct 2008 11:10:12 -0000 1.2 *************** *** 1,4 **** #!perl -w ! BEGIN { $| = 1; } # $Id$ --- 1,7 ---- #!perl -w ! BEGIN { ! print "1..0 # Skip win32 required\n" and exit unless $^O =~ /win32|cygwin/i; ! $| = 1; ! } # $Id$ Index: 02_calc.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/02_calc.t,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 02_calc.t 23 Oct 2007 12:22:48 -0000 1.1 --- 02_calc.t 1 Oct 2008 11:10:12 -0000 1.2 *************** *** 1,4 **** #!perl -w ! BEGIN { $| = 1; } # Do some tricks with the calculator --- 1,7 ---- #!perl -w ! BEGIN { ! print "1..0 # Skip win32 required\n" and exit unless $^O =~ /win32|cygwin/i; ! $| = 1; ! } # Do some tricks with the calculator Index: 01_basic.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/01_basic.t,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 01_basic.t 23 Oct 2007 12:22:48 -0000 1.1 --- 01_basic.t 1 Oct 2008 11:10:12 -0000 1.2 *************** *** 1,4 **** #!perl -w ! BEGIN { $| = 1; } # $Id$ --- 1,7 ---- #!perl -w ! BEGIN { ! print "1..0 # Skip win32 required\n" and exit unless $^O =~ /win32|cygwin/i; ! $| = 1; ! } # $Id$ Index: 04_std.t =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/t/04_std.t,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** 04_std.t 23 Oct 2007 12:22:48 -0000 1.1 --- 04_std.t 1 Oct 2008 11:10:12 -0000 1.2 *************** *** 1,4 **** #!perl -w ! BEGIN { $| = 1; } # $Id$ --- 1,7 ---- #!perl -w ! BEGIN { ! print "1..0 # Skip win32 required\n" and exit unless $^O =~ /win32|cygwin/i; ! $| = 1; ! } # $Id$ |
From: Dmitry K. <in...@us...> - 2008-10-01 11:10:27
|
Update of /cvsroot/winguitest/Win32-GuiTest In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv20994 Modified Files: MANIFEST Makefile.PL make_eg.pl Log Message: - incorporate minor changes accumulated in 1.54 @ CPAN Index: make_eg.pl =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/make_eg.pl,v retrieving revision 1.5 retrieving revision 1.6 diff -C2 -d -r1.5 -r1.6 *** make_eg.pl 23 Oct 2007 11:40:40 -0000 1.5 --- make_eg.pl 1 Oct 2008 11:10:12 -0000 1.6 *************** *** 31,35 **** ! open(MAN, "<manifest"); my @manifest = <MAN>; close(MAN); --- 31,35 ---- ! open(MAN, "<MANIFEST"); my @manifest = <MAN>; close(MAN); Index: Makefile.PL =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/Makefile.PL,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** Makefile.PL 23 Oct 2007 11:44:54 -0000 1.1 --- Makefile.PL 1 Oct 2008 11:10:12 -0000 1.2 *************** *** 7,16 **** --- 7,21 ---- my $DEBUG = grep { m/^--debug$/ } @ARGV; + my $can_compile = $^O =~ /win32|cygwin/i; + + warn "** This module can only work under Win32\n" unless $can_compile; my @make = ( NAME => 'Win32::GuiTest', VERSION_FROM => 'lib/Win32/GuiTest.pm', + $can_compile ? ( OBJECT => 'GuiTest$(OBJ_EXT) DibSect$(OBJ_EXT)' , XS => { 'GuiTest.xs' => 'GuiTest.cpp' }, + ) : ( C => [], XS => {},), TYPEMAPS => ['perlobject.map' ], ( $DEBUG ? ( Index: MANIFEST =================================================================== RCS file: /cvsroot/winguitest/Win32-GuiTest/MANIFEST,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** MANIFEST 15 Dec 2007 21:45:10 -0000 1.3 --- MANIFEST 1 Oct 2008 11:10:12 -0000 1.4 *************** *** 29,36 **** eg/wptr.pl GuiTest.xs ! lib/win32/GuiTest.pm ! lib/win32/GuiTest/Examples.pm ! lib/win32/GuiTest/Cmd.pm ! lib/win32/GuiTest/GuiTest.pc Makefile.PL MANIFEST This list of files --- 29,36 ---- eg/wptr.pl GuiTest.xs ! lib/Win32/GuiTest.pm ! lib/Win32/GuiTest/Examples.pm ! lib/Win32/GuiTest/Cmd.pm ! lib/Win32/GuiTest/GuiTest.pc Makefile.PL MANIFEST This list of files |