[ViewVC] Diff of: cvs/CV/lib/Gtk2/CV.pm

Comparing CV/lib/Gtk2/CV.pm (file contents):
Revision 1.18 by root, Thu Jul 21 01:04:29 2005 UTC vs.
Revision 1.23 by root, Wed Sep 7 17:17:39 2005 UTC

 package Gtk2::CV;
-use XSLoader;
-$VERSION = '0.5';
-XSLoader::load "Gtk2::CV", $VERSION;
 use Gtk2;
 use Glib;
 use IO::AIO;
+BEGIN {
+   use XSLoader;
+   $VERSION = '1.0';
+   XSLoader::load "Gtk2::CV", $VERSION;
+}
 my $aio_source;
+# we use a low priority to give GUI interactions as high a priority
+# as possible.
 sub enable_aio {
    $aio_source ||=
       add_watch Glib::IO IO::AIO::poll_fileno,
-                         in => sub { IO::AIO::poll_cb; 1 };
+                         in => sub { IO::AIO::poll_cb; 1 },
+                         undef,
+                         &Glib::G_PRIORITY_LOW;
 }
 sub disable_aio {
    remove Glib::Source $aio_source if $aio_source;
    undef $aio_source;
 sub require_image($) {
    new_from_file Gtk2::Gdk::Pixbuf find_rcfile "images/$_[0]";
 }
+sub dealpha_compose($) {
+   return $_[0] unless $_[0]->get_has_alpha;
+   Gtk2::CV::dealpha_expose $_[0]->composite_color_simple (
+      $_[0]->get_width, $_[0]->get_height,
+      'nearest', 255, 16, 0xffc0c0c0, 0xff606060,
+   )
+}
+# TODO: make preferences
+sub dealpha($) {
+   &dealpha_compose
+}
 1;

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines