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 -0000      1.86
--- CHANGELOG   14 Jun 2006 22:26:31 -0000      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.cpp        12 Apr 2006 20:00:06 -0000      1.20
--- GUI_MessageLoops.cpp        14 Jun 2006 22:26:31 -0000      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<Win32::GUI::AcceptFiles|AccepFiles()>). The DROP parameter is 
either
!        * a Win32 drop handle (see MSDN) or a
         * L<Win32::GUI::DropFiles|Win32::GUI::DropFiles> object if you have 
done
         * C<use Win32::GUI::DropFiles;> 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<AcceptFiles()|Win32::Reference::Methods/AcceptFiles>). The
!      * DROP parameter is either * a Win32 drop handle (see MSDN) or a
         * L<Win32::GUI::DropFiles|Win32::GUI::DropFiles> object if you have 
done
         * C<use Win32::GUI::DropFiles;> 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 -0000      1.47
--- GUI.pm      14 Jun 2006 22:26:31 -0000      1.48
***************
*** 288,292 ****
      
###########################################################################
      # (@)METHOD:AcceptFiles([FLAG])
!     # Gets/sets the 
L<Win32::GUI::Reference::Options\-acceptfiles|-acceptfiles>
      # options on a window.  If C<FLAG> 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<FLAG> 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
*** MANIFEST    11 Jun 2006 21:00:15 -0000      1.17
--- MANIFEST    14 Jun 2006 22:26:31 -0000      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 ----


Reply via email to