From: root <root>
Date: Sat, 26 Dec 2009 09:02:42 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Url: http://git.openbox.org/?a=commitdiff_plain;h=9823094f9ecca0313b24990c609a3ef0b2595026;p=dana%2Furxvt.git

*** empty log message ***
---

diff --git a/Changes b/Changes
index eec1b66f..af14b5c7 100644
--- a/Changes
+++ b/Changes
@@ -24,9 +24,7 @@ TODO: exg-- patch
 TODO: selection_beg/end should set screen, or so
 TODO:        - upgrade to libev-xx
 TODO: -rv interacts badly with popups.
-TODO: idle/interval timer implementation für anyevent
 TODO: perl-shell-window?
-TODO: restore signal mask when starting shells
 TODO: zweimal numlock? falsche codes rxvt urxvt for numpad?
 	- port to glibc-2.10 changes (strchr etc. returning const char *
           in C++), based on patches by Milos Jakubicek and Oliver Mader.
@@ -56,6 +54,7 @@ TODO: zweimal numlock? falsche codes rxvt urxvt for numpad?
           the old version to macosx-pastebin-native.
         - document the -uc option (exg).
         - assertions in libev are now enabled depending on frills.
+        - update AnyEvent implementation to version 5.23 API.
         - work around arrogant bsd idiocies again: netbsd spills the default
           namespace with lots of symbols "for gnu/gcc compatibility" even
           though neither of them does it, and then calls the rest of the world
diff --git a/src/urxvt.pm b/src/urxvt.pm
index dc160481..8fa61c3f 100644
--- a/src/urxvt.pm
+++ b/src/urxvt.pm
@@ -1126,7 +1126,7 @@ work.
 
 =cut
 
-our $VERSION = '3.4';
+our $VERSION = '5.23';
 
 $INC{"urxvt/anyevent.pm"} = 1; # mark us as there
 push @AnyEvent::REGISTRY, [urxvt => urxvt::anyevent::];
@@ -1141,8 +1141,7 @@ sub timer {
       ->after ($arg{after})
       ->interval ($arg{interval})
       ->start
-      ->cb (sub {
-        #TODO interval?
+      ->cb ($argv{interval} ? $cb : sub {
         $_[0]->stop; # need to cancel manually
         $cb->();
       })
@@ -1173,11 +1172,7 @@ sub idle {
    urxvt::iw
       ->new
       ->start
-      ->cb (sub {
-        #TODO really cancel?
-        $_[0]->stop; # need to cancel manually
-        $cb->();
-      })
+      ->cb ($cb)
 }
 
 sub child {
@@ -1189,7 +1184,6 @@ sub child {
       ->new
       ->start ($arg{pid})
       ->cb (sub {
-        #TODO really cancel?
         $_[0]->stop; # need to cancel manually
         $cb->($_[0]->rpid, $_[0]->rstatus);
       })