[Perl-win32-gui-cvscommit] Win32-GUI/Win32-GUI-Grid Grid.xs, 1.2, 1.3

[Robert May]

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

Modified Files:
Grid.xs 
Log Message:
Fixes: typos and Scintilla::Perl default styles

Index: Grid.xs
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Grid/Grid.xs,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Grid.xs 11 Jun 2006 16:42:10 -  1.2
--- Grid.xs 14 Jun 2006 22:26:31 -  1.3
***
*** 140,144 
{
  dSP;
- dTARG;
  ENTER;
  SAVETMPS;
--- 140,143 
***
*** 166,170 
if(perl_get_cv(Name, FALSE) != NULL) {
   dSP;
-  dTARG;
   ENTER ;
   SAVETMPS;
--- 165,168 
***
*** 196,200 
{
   dSP;
-  dTARG;
   ENTER ;
   SAVETMPS;
--- 194,197 
***
*** 228,232 
{
   dSP;
-  dTARG;
   ENTER ;
   SAVETMPS;
--- 225,228 
***
*** 450,454 
  
dSP;
-   dTARG;
ENTER ;
SAVETMPS ;
--- 446,449 
***
*** 779,783 
if(perl_get_cv(csEvent , FALSE) != NULL) {
   dSP;
-  dTARG;
   ENTER ;
   SAVETMPS;
--- 774,777 

[Perl-win32-gui-cvscommit] Win32-GUI/Win32-GUI-Scintilla Changes, 1.3, 1.4 Perl.pm, 1.2, 1.3 Scintilla.pod, 1.1, 1.2 TODO, 1.2, 1.3

[Robert May]

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

Modified Files:
Changes Perl.pm Scintilla.pod TODO 
Log Message:
Fixes: typos and Scintilla::Perl default styles

Index: Scintilla.pod
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Scintilla/Scintilla.pod,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** Scintilla.pod   11 Jun 2006 16:51:48 -  1.1
--- Scintilla.pod   14 Jun 2006 22:26:31 -  1.2
***
*** 66,70 
  Scintilla is a free source code editing component.
  
! See : L
  
  =head2 Scintilla creation
--- 66,70 
  Scintilla is a free source code editing component.
  
! See : L
  
  =head2 Scintilla creation
***
*** 285,289 
  =head2 Scintilla standard method
  
! For full documentation off Scintilla control see L
  
  =over
--- 285,289 
  =head2 Scintilla standard method
  
! For full documentation of Scintilla control see L
  
  =over
***
*** 2364,2368 
  
 Win32::GUI - L
!Scintilla  - L
  
  =head1 SEE ALSO
--- 2364,2368 
  
 Win32::GUI - L
!Scintilla  - L
  
  =head1 SEE ALSO

Index: TODO
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Scintilla/TODO,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** TODO11 Jun 2006 21:00:16 -  1.2
--- TODO14 Jun 2006 22:26:31 -  1.3
***
*** 4,5 
--- 4,6 
- More subclasses for syntax high-lighting other languages
- find a way to make Scintilla (SciLexer.dll) play nicely with PAR
+   - NEM event support

Index: Perl.pm
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/Win32-GUI-Scintilla/Perl.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** Perl.pm 11 Jun 2006 16:51:44 -  1.2
--- Perl.pm 14 Jun 2006 22:26:31 -  1.3
***
*** 8,11 
--- 8,13 
  use Win32::GUI::Scintilla();
  
+ our $VERSION = "0.01";
+ 
  =head1 NAME
  
***
*** 160,174 
  
# Define Style
-   $sci->StyleClearAll();
  
# Global default styles for all languages
$sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_DEFAULT, 
"face:$hFontFace{'mono'},size:$hFontFace{'size'}");
!   $sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_LINENUMBER,  
"back:#C0C0C0,face:$hFontFace{mono}");
!   $sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_CONTROLCHAR, 
"face:$hFontFace{mono}");
$sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_BRACELIGHT,  
"fore:#FF,back:#FF,bold");
$sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_BRACEBAD,
"fore:#00,back:#FF,bold");
  
# White space
!   $sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_DEFAULT, 
"fore:#808080,face:$hFontFace{'mono'}");
# Error
$sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_ERROR , "fore:#FF");
--- 162,176 
  
# Define Style
  
# Global default styles for all languages
$sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_DEFAULT, 
"face:$hFontFace{'mono'},size:$hFontFace{'size'}");
!   $sci->StyleClearAll();  # Apply STYLE_DEFAULT to all styles
!   $sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_LINENUMBER,  
"back:#C0C0C0");
!   $sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_CONTROLCHAR, "");
$sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_BRACELIGHT,  
"fore:#FF,back:#FF,bold");
$sci->StyleSetSpec(Win32::GUI::Scintilla::STYLE_BRACEBAD,
"fore:#00,back:#FF,bold");
  
# White space
!   $sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_DEFAULT, "fore:#808080");
# Error
$sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_ERROR , "fore:#FF");
***
*** 182,188 
$sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_WORD , 
"fore:#7F,bold");
# Double quoted string
!   $sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_STRING, 
"fore:#7F007F,face:$hFontFace{'mono'},italic");
# Single quoted string
!   $sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_CHARACTER, 
"fore:#7F,face:$hFontFace{'mono'},italic");
# Symbols / Punctuation. Currently not used by LexPerl.
$sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_PUNCTUATION, 
"fore:#7F,bold");
--- 184,190 
$sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_WORD , 
"fore:#7F,bold");
# Double quoted string
!   $sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_STRING, "fore:#7F007F");
# Single quoted string
!   $sci->StyleSetSpec (Win32::GUI::Scintilla::SCE_PL_CHARACTER, 
"fore:#7F");
# 

[Perl-win32-gui-cvscommit] Win32-GUI/docs GUI.pod,1.4,1.5

[Robert May]

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

Modified Files:
GUI.pod 
Log Message:
Fixes: typos and Scintilla::Perl default styles

Index: GUI.pod
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/docs/GUI.pod,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** GUI.pod 3 Aug 2005 21:45:59 -   1.4
--- GUI.pod 14 Jun 2006 22:26:31 -  1.5
***
*** 47,49 
--- 47,59 
  =back
  
+ =head1 Sample Code
+ 
+ There is a set of sample applications installed with
+ Win32::GUI, that should be found in the
+ F<.../Win32/GUI/demos/> directory under your library
+ installtion root (by default for ActiveState perl this
+ is at F).  There is
+ a launcher application installed as well.  Type
+ C at a command prompt.
+ 
  __W32G_POSTAMBLE__

[Perl-win32-gui-cvscommit] Win32-GUI CHANGELOG, 1.86, 1.87 GUI.pm, 1.47, 1.48 GUI_MessageLoops.cpp, 1.20, 1.21 MANIFEST, 1.17, 1.18

[Robert May]

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

Modified Files:
CHANGELOG GUI.pm GUI_MessageLoops.cpp MANIFEST 
Log Message:
Fixes: typos and Scintilla::Perl default styles

Index: CHANGELOG
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/CHANGELOG,v
retrieving revision 1.86
retrieving revision 1.87
diff -C2 -d -r1.86 -r1.87
*** CHANGELOG   11 Jun 2006 21:00:15 -  1.86
--- CHANGELOG   14 Jun 2006 22:26:31 -  1.87
***
*** 6,9 
--- 6,20 
  Win32-GUI ChangeLog
  ===
+ + [Robert May] : 14 June 2006 - Fix Cygwin build
+ - GUI.pm - fix docs; fix NotifyIcon->new to not modify parent if
+   failure on creation
+ - GUI_MessageLoops.cpp - fix documentation
+ - MANIFEST - corrected
+ --- Win32::GUI::Scintilla ---
+ - Perl.pm - fixed default styles
+ - Scintilla.pod - typos
+ --- Win32::GUI::Constants ---
+ - add Changes and TODO
+ 
  + [Robert May] : 11 June 2006 - Fix Cygwin build
  - All Makefile.PL: add MY::special_targets to add .rc and .res to

Index: GUI_MessageLoops.cpp
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/GUI_MessageLoops.cpp,v
retrieving revision 1.20
retrieving revision 1.21
diff -C2 -d -r1.20 -r1.21
*** GUI_MessageLoops.cpp12 Apr 2006 20:00:06 -  1.20
--- GUI_MessageLoops.cpp14 Jun 2006 22:26:31 -  1.21
***
*** 632,637 
 * window's L<-acceptfiles|Win32::GUI::Reference::Options\-acceptfiles>
 * option or call C<< $win->AcceptFiles(1) >> on the window (See
!* L). The DROP parameter is 
either
!* a Win32 drop handle (see MSDN) or a
 * L object if you have 
done
 * C somewhere in your code.
--- 632,637 
 * window's L<-acceptfiles|Win32::GUI::Reference::Options\-acceptfiles>
 * option or call C<< $win->AcceptFiles(1) >> on the window (See
!* L). The
!  * DROP parameter is either * a Win32 drop handle (see MSDN) or a
 * L object if you have 
done
 * C somewhere in your code.

Index: GUI.pm
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/GUI.pm,v
retrieving revision 1.47
retrieving revision 1.48
diff -C2 -d -r1.47 -r1.48
*** GUI.pm  11 Jun 2006 21:00:15 -  1.47
--- GUI.pm  14 Jun 2006 22:26:31 -  1.48
***
*** 288,292 
  
###
  # (@)METHOD:AcceptFiles([FLAG])
! # Gets/sets the 
L
  # options on a window.  If C is not provided, returns the current
  # state.  If FLAG is provided it sets or unsets the state, returning the
--- 288,292 
  
###
  # (@)METHOD:AcceptFiles([FLAG])
! # Gets/sets the L<-acceptfiles|Win32::GUI::Reference::Options/acceptfiles>
  # options on a window.  If C is not provided, returns the current
  # state.  If FLAG is provided it sets or unsets the state, returning the
***
*** 2572,2575 
--- 2572,2580 
  $self->{-balloon_icon} = $args{-balloon_icon};
  
+ my $result = Win32::GUI::NotifyIcon::_Add($self->{-handle}, %args);
+ 
+ return undef unless $result;
+ 
+ # Only modify parent if we were created successfully
  # Store name in parent's notifyicons hash
  $window->{-notifyicons}->{$args{-id}} = $args{-name};
***
*** 2577,2583 
  $window->{$args{-name}} = $self;
  
- my $result = Win32::GUI::NotifyIcon::_Add($self->{-handle}, %args);
- 
- return undef unless $result;
  return $self;
  }
--- 2582,2585 

Index: MANIFEST
===
RCS file: /cvsroot/perl-win32-gui/Win32-GUI/MANIFEST,v
retrieving revision 1.17
retrieving revision 1.18
diff -C2 -d -r1.17 -r1.18
*** MANIFEST11 Jun 2006 21:00:15 -  1.17
--- MANIFEST14 Jun 2006 22:26:31 -  1.18
***
*** 206,210 
  Win32-GUI-Constants/Tags.pm
  Win32-GUI-Constants/TODO
- win32-gui-demos.pl
  Win32-GUI-DIBitmap/Changes
  Win32-GUI-DIBitmap/demos/1.bmp
--- 206,209 

[Perl-win32-gui-cvscommit] Win32-GUI/Win32-GUI-Constants Changes, NONE, 1.1 TODO, NONE, 1.1

[Robert May]

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

Added Files:
Changes TODO 
Log Message:
Fixes: typos and Scintilla::Perl default styles

--- NEW FILE: Changes ---
Revision history for Perl extension Win32::GUI::Constants.

0.01  22/05/2006
- original version

--- NEW FILE: TODO ---
- document constants usage in Win32::GUI
- look at using PERL_HASH as the hash function