Menu
▾
▴
perl-win32-gui-cvscommit — Send-only list for receiving email when commits are made to project CVS
You can subscribe to this list here.
| 2005 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
(6) |
Nov
(31) |
Dec
(6) |
|---|---|---|---|---|---|---|---|---|---|---|---|---|
| 2006 |
Jan
(6) |
Feb
|
Mar
(17) |
Apr
(17) |
May
(27) |
Jun
(67) |
Jul
(26) |
Aug
(15) |
Sep
(2) |
Oct
(24) |
Nov
(6) |
Dec
|
| 2007 |
Jan
(4) |
Feb
(1) |
Mar
|
Apr
|
May
|
Jun
|
Jul
(28) |
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2008 |
Jan
(21) |
Feb
(45) |
Mar
|
Apr
|
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2010 |
Jan
|
Feb
(3) |
Mar
|
Apr
(3) |
May
|
Jun
|
Jul
|
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| 2011 |
Jan
|
Feb
|
Mar
|
Apr
|
May
|
Jun
|
Jul
(1) |
Aug
|
Sep
|
Oct
|
Nov
|
Dec
|
| S | M | T | W | T | F | S |
|---|---|---|---|---|---|---|
|
1
|
2
|
3
|
4
|
5
|
6
|
7
|
|
8
|
9
|
10
|
11
|
12
|
13
|
14
|
|
15
(17) |
16
(7) |
17
|
18
|
19
|
20
|
21
|
|
22
|
23
|
24
|
25
|
26
|
27
|
28
|
|
29
|
30
(4) |
31
|
|
|
|
|
|
From: Robert M. <rob...@us...> - 2007-07-15 18:29:00
|
Update of /cvsroot/perl-win32-gui/Win32-GUI In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1693 Modified Files: CHANGELOG DC.xs Log Message: Fix all the Poly*() draw routines Index: DC.xs =================================================================== RCS file: /cvsroot/perl-win32-gui/Win32-GUI/DC.xs,v retrieving revision 1.15 retrieving revision 1.16 diff -C2 -d -r1.15 -r1.16 *** DC.xs 26 Jun 2006 18:22:52 -0000 1.15 --- DC.xs 15 Jul 2007 18:29:00 -0000 1.16 *************** *** 387,391 **** ########################################################################### ! # (@)METHOD:Polygon([X,Y]+) # Draws a polygon consisting of two or more vertices connected by # straight lines. --- 387,391 ---- ########################################################################### ! # (@)METHOD:Polygon(X1, Y1, X2, Y2, [ X, Y, ... ]) # Draws a polygon consisting of two or more vertices connected by # straight lines. *************** *** 395,409 **** PREINIT: POINT *lpPoints; ! int nCount, i; CODE: ! if (items < 5 || (items - 1) % 2 != 0) ! croak("Usage: Polygon([x, y]+);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1; i < items; i += 2) { ! lpPoints[i].x = SvIV(ST(i)); ! lpPoints[i].y = SvIV(ST(i+1)); } --- 395,409 ---- PREINIT: POINT *lpPoints; ! int nCount, i, j; CODE: ! if (items < 5 || (items - 5) % 2 != 0) ! croak("Usage: Polygon(X1, Y1, X2, Y2, [ X, Y, ... ]);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1, j = 0; i < items; i += 2, j++) { ! lpPoints[j].x = SvIV(ST(i)); ! lpPoints[j].y = SvIV(ST(i+1)); } *************** *** 697,701 **** ########################################################################### ! # (@)METHOD:PolyBezier([X,Y]+) # Draws one or more Bézier curves. # The first curve is drawn from the first point to the fourth point by --- 697,701 ---- ########################################################################### ! # (@)METHOD:PolyBezier(X1, Y1, X2, Y2, X3, Y3, X4, Y4, [ X, Y, ... ]) # Draws one or more Bézier curves. # The first curve is drawn from the first point to the fourth point by *************** *** 710,724 **** PREINIT: POINT *lpPoints; ! int nCount, i; CODE: ! if (items < 9 || (items - 1) % 2 != 0) ! croak("Usage: PolyBezier([x, y]+);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1; i < items; i += 2) { ! lpPoints[i].x = SvIV(ST(i)); ! lpPoints[i].y = SvIV(ST(i+1)); } --- 710,724 ---- PREINIT: POINT *lpPoints; ! int nCount, i, j; CODE: ! if (items < 9 || (items - 9) % 6 != 0) ! croak("Usage: PolyBezier(X1, Y1, X2, Y2, X3, Y3, X4, Y4, [ X, Y, ... ]);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1, j = 0; i < items; i += 2, j++) { ! lpPoints[j].x = SvIV(ST(i)); ! lpPoints[j].y = SvIV(ST(i+1)); } *************** *** 729,733 **** ########################################################################### ! # (@)METHOD:PolyBezierTo ([X,Y]+) # Draws cubic Bézier curves. # The first curve is drawn from the current position to the third point by --- 729,733 ---- ########################################################################### ! # (@)METHOD:PolyBezierTo(X1, Y1, X2, Y2, X3, Y3, [ X, Y, ... ]) # Draws cubic Bézier curves. # The first curve is drawn from the current position to the third point by *************** *** 740,754 **** PREINIT: POINT *lpPoints; ! int nCount, i; CODE: ! if (items < 7 || (items - 1) % 2 != 0) ! croak("Usage: PolyBezier([x, y]+);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1; i < items; i += 2) { ! lpPoints[i].x = SvIV(ST(i)); ! lpPoints[i].y = SvIV(ST(i+1)); } --- 740,754 ---- PREINIT: POINT *lpPoints; ! int nCount, i, j; CODE: ! if (items < 7 || (items - 7) % 6 != 0) ! croak("Usage: PolyBezier(X1, Y1, X2, Y2, X3, Y3, [ X, Y, ... ]);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1, j = 0; i < items; i += 2, j++) { ! lpPoints[j].x = SvIV(ST(i)); ! lpPoints[j].y = SvIV(ST(i+1)); } *************** *** 761,765 **** ########################################################################### ! # (@)METHOD:Polyline ([X,Y]+) # Draws one or more straight lines. BOOL --- 761,765 ---- ########################################################################### ! # (@)METHOD:Polyline (X1, Y1, X2, Y2, [ X, Y, ... ]) # Draws one or more straight lines. BOOL *************** *** 768,782 **** PREINIT: POINT *lpPoints; ! int nCount, i; CODE: ! if (items < 5 || (items - 1) % 2 != 0) ! croak("Usage: PolyBezier([x, y]+);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1; i < items; i += 2) { ! lpPoints[i].x = SvIV(ST(i)); ! lpPoints[i].y = SvIV(ST(i+1)); } --- 768,782 ---- PREINIT: POINT *lpPoints; ! int nCount, i, j; CODE: ! if (items < 5 || (items - 5) % 2 != 0) ! croak("Usage: Polyline(X1, Y1, X2, Y2, [ X, Y, ... ]);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1, j = 0; i < items; i += 2, j++) { ! lpPoints[j].x = SvIV(ST(i)); ! lpPoints[j].y = SvIV(ST(i+1)); } *************** *** 787,791 **** ########################################################################### ! # (@)METHOD:PolylineTo ([X,Y]+) # Draws one or more straight lines. BOOL --- 787,791 ---- ########################################################################### ! # (@)METHOD:PolylineTo (X1, Y1, [ X, Y, ... ]) # Draws one or more straight lines. BOOL *************** *** 794,808 **** PREINIT: POINT *lpPoints; ! int nCount, i; CODE: ! if (items < 5 || (items - 1) % 2 != 0) ! croak("Usage: PolyBezier([x, y]+);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1; i < items; i += 2) { ! lpPoints[i].x = SvIV(ST(i)); ! lpPoints[i].y = SvIV(ST(i+1)); } --- 794,808 ---- PREINIT: POINT *lpPoints; ! int nCount, i, j; CODE: ! if (items < 3 || (items - 3) % 2 != 0) ! croak("Usage: PolylineTo(X1, Y2, [ X, Y, ... ]);\n"); nCount = (items - 1) / 2; lpPoints = (POINT *) safemalloc(nCount * sizeof(POINT)); ! for (i = 1, j = 0; i < items; i += 2, j++) { ! lpPoints[j].x = SvIV(ST(i)); ! lpPoints[j].y = SvIV(ST(i+1)); } Index: CHANGELOG =================================================================== RCS file: /cvsroot/perl-win32-gui/Win32-GUI/CHANGELOG,v retrieving revision 1.110 retrieving revision 1.111 diff -C2 -d -r1.110 -r1.111 *** CHANGELOG 15 Jul 2007 18:23:06 -0000 1.110 --- CHANGELOG 15 Jul 2007 18:29:00 -0000 1.111 *************** *** 11,14 **** --- 11,16 ---- -dropdownlist together have a more predictable result. Update docs. [Glenn Linderman] + - DC.xs - Fix Polygon(), PolyBezier(), PolyBezierTo(), PolyLine(), + PolyLineTo(). [George] + [Robert May] : 20 January 2007 - Restore Original WndProc |
|
From: Robert M. <rob...@us...> - 2007-07-15 18:23:06
|
Update of /cvsroot/perl-win32-gui/Win32-GUI In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv31882 Modified Files: CHANGELOG Combobox.xs GUI.pm Log Message: Fix interaction of 'simple', 'dropdown' and 'dropdownlist' options to combobox Index: Combobox.xs =================================================================== RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Combobox.xs,v retrieving revision 1.8 retrieving revision 1.9 diff -C2 -d -r1.8 -r1.9 *** Combobox.xs 31 Oct 2006 22:24:15 -0000 1.8 --- Combobox.xs 15 Jul 2007 18:23:06 -0000 1.9 *************** *** 24,36 **** if BitmaskOptionValue("-autohscroll", perlcs->cs.style, CBS_AUTOHSCROLL) } else if BitmaskOptionValue("-disablenoscroll", perlcs->cs.style, CBS_DISABLENOSCROLL) - } else if BitmaskOptionValue("-dropdown", perlcs->cs.style, CBS_DROPDOWN) - } else if BitmaskOptionValue("-dropdownlist", perlcs->cs.style, CBS_DROPDOWNLIST) } else if BitmaskOptionValue("-hasstring", perlcs->cs.style, CBS_HASSTRINGS) } else if BitmaskOptionValue("-lowercase", perlcs->cs.style, CBS_LOWERCASE) } else if BitmaskOptionValue("-nointegraleheight", perlcs->cs.style, CBS_NOINTEGRALHEIGHT) - } else if BitmaskOptionValue("-simple", perlcs->cs.style, CBS_SIMPLE) } else if BitmaskOptionValue("-sort", perlcs->cs.style, CBS_SORT) } else if BitmaskOptionValue("-uppercase", perlcs->cs.style, CBS_UPPERCASE) ! } else retval = FALSE; return retval; --- 24,46 ---- if BitmaskOptionValue("-autohscroll", perlcs->cs.style, CBS_AUTOHSCROLL) } else if BitmaskOptionValue("-disablenoscroll", perlcs->cs.style, CBS_DISABLENOSCROLL) } else if BitmaskOptionValue("-hasstring", perlcs->cs.style, CBS_HASSTRINGS) } else if BitmaskOptionValue("-lowercase", perlcs->cs.style, CBS_LOWERCASE) } else if BitmaskOptionValue("-nointegraleheight", perlcs->cs.style, CBS_NOINTEGRALHEIGHT) } else if BitmaskOptionValue("-sort", perlcs->cs.style, CBS_SORT) } else if BitmaskOptionValue("-uppercase", perlcs->cs.style, CBS_UPPERCASE) ! } ! else if(strcmp(option, "-simple") == 0) { ! perlcs->cs.style &= ~CBS_DROPDOWNLIST; ! perlcs->cs.style |= CBS_SIMPLE; ! } ! else if(strcmp(option, "-dropdown") == 0) { ! perlcs->cs.style &= ~CBS_DROPDOWNLIST; ! perlcs->cs.style |= CBS_DROPDOWN; ! } ! else if(strcmp(option, "-dropdownlist") == 0) { ! perlcs->cs.style |= CBS_DROPDOWNLIST; ! } ! else ! retval = FALSE; return retval; Index: GUI.pm =================================================================== RCS file: /cvsroot/perl-win32-gui/Win32-GUI/GUI.pm,v retrieving revision 1.61 retrieving revision 1.62 diff -C2 -d -r1.61 -r1.62 *** GUI.pm 15 Jul 2007 18:16:20 -0000 1.61 --- GUI.pm 15 Jul 2007 18:23:06 -0000 1.62 *************** *** 1601,1604 **** --- 1601,1607 ---- # -uppercase => 0/1 (default 0) # Set/Unset uppercase style + # + # Only one of -simple, -dropdown and -dropdownlist should be used. If + # more than one is used, only the last one will be acted on. sub new { Index: CHANGELOG =================================================================== RCS file: /cvsroot/perl-win32-gui/Win32-GUI/CHANGELOG,v retrieving revision 1.109 retrieving revision 1.110 diff -C2 -d -r1.109 -r1.110 *** CHANGELOG 15 Jul 2007 18:16:20 -0000 1.109 --- CHANGELOG 15 Jul 2007 18:23:06 -0000 1.110 *************** *** 8,11 **** --- 8,14 ---- + [Robert May] : 15 July 2007 - Bug Fixes - GUI.pm - fix bltr direction in Animate Window [Tim Hansell] + - Comboxbox.xs, GUI.pm - fix options so use of -simple, -dropdown and + -dropdownlist together have a more predictable result. + Update docs. [Glenn Linderman] + [Robert May] : 20 January 2007 - Restore Original WndProc |
|
From: Robert M. <rob...@us...> - 2007-07-15 18:16:20
|
Update of /cvsroot/perl-win32-gui/Win32-GUI In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv29539 Modified Files: CHANGELOG GUI.pm Log Message: Fix 'bltr' direction in AnimateWindow Index: GUI.pm =================================================================== RCS file: /cvsroot/perl-win32-gui/Win32-GUI/GUI.pm,v retrieving revision 1.60 retrieving revision 1.61 diff -C2 -d -r1.60 -r1.61 *** GUI.pm 9 Feb 2007 21:56:04 -0000 1.60 --- GUI.pm 15 Jul 2007 18:16:20 -0000 1.61 *************** *** 20,24 **** # STATIC OBJECT PROPERTIES # ! $VERSION = "1.05_01"; # For MakeMaker $XS_VERSION = $VERSION; # For dynaloader $VERSION = eval $VERSION; # For Perl (see perldoc perlmodstyle) --- 20,24 ---- # STATIC OBJECT PROPERTIES # ! $VERSION = "1.05_02"; # For MakeMaker and CPAN $XS_VERSION = $VERSION; # For dynaloader $VERSION = eval $VERSION; # For Perl (see perldoc perlmodstyle) *************** *** 402,406 **** # Animation time in milli-seconds # ! # -direction => (lr|tlbr|tb|trbl|rl|brtl|bt|blrt) default: 'lr' # Animation direction (l=left, r=right, t=top, b=bottom). # Ignored for animation types blend and center --- 402,406 ---- # Animation time in milli-seconds # ! # -direction => (lr|tlbr|tb|trbl|rl|brtl|bt|bltr) default: 'lr' # Animation direction (l=left, r=right, t=top, b=bottom). # Ignored for animation types blend and center *************** *** 439,446 **** } ! if($direction !~ /lr|tlbr|tb|trbl|rl|brtl|bt|blrt/) { require Carp; Carp::carp "Animate: Unrecognised direction: $direction"; ! return undef; } --- 439,446 ---- } ! if($direction !~ /lr|tlbr|tb|trbl|rl|brtl|bt|bltr/) { require Carp; Carp::carp "Animate: Unrecognised direction: $direction"; ! return undef unless $direction eq 'blrt'; # blrt allowed for deprection cycle } Index: CHANGELOG =================================================================== RCS file: /cvsroot/perl-win32-gui/Win32-GUI/CHANGELOG,v retrieving revision 1.108 retrieving revision 1.109 diff -C2 -d -r1.108 -r1.109 *** CHANGELOG 20 Jan 2007 19:45:44 -0000 1.108 --- CHANGELOG 15 Jul 2007 18:16:20 -0000 1.109 *************** *** 6,9 **** --- 6,12 ---- Win32-GUI ChangeLog =================== + + [Robert May] : 15 July 2007 - Bug Fixes + - GUI.pm - fix bltr direction in Animate Window [Tim Hansell] + + [Robert May] : 20 January 2007 - Restore Original WndProc - GUI_Helpers.cpp - restore the window's original wndproc |
