diff options
| author | dakkar <dakkar@sardina.(none)> | 2009-08-06 14:49:44 +0200 |
|---|---|---|
| committer | dakkar <dakkar@sardina.(none)> | 2009-08-06 14:50:29 +0200 |
| commit | fc2e454e91daec9854302431f48b31f2181d03c9 (patch) | |
| tree | ed6a0867152a4be8f9b26dc6fd1cbbe49563cd40 /lib/Thread/Queue/Event | |
| parent | refactor and expose more methods (diff) | |
| download | Thread-Queue-Event-fc2e454e91daec9854302431f48b31f2181d03c9.tar.gz Thread-Queue-Event-fc2e454e91daec9854302431f48b31f2181d03c9.tar.bz2 Thread-Queue-Event-fc2e454e91daec9854302431f48b31f2181d03c9.zip | |
refactor to roles
Diffstat (limited to 'lib/Thread/Queue/Event')
| -rw-r--r-- | lib/Thread/Queue/Event/Glib.pm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/Thread/Queue/Event/Glib.pm b/lib/Thread/Queue/Event/Glib.pm new file mode 100644 index 0000000..1c36c99 --- /dev/null +++ b/lib/Thread/Queue/Event/Glib.pm @@ -0,0 +1,14 @@ +package Thread::Queue::Event::Glib; +use Moose::Role; +use Glib; + +requires 'event_fileno'; + +sub add_watch { + my ($self,$sub)=@_; + + Glib::IO->add_watch($self->event_fileno,'in',$sub); +} + +no Moose; +1; |