From: root <root>
Date: Sun, 8 Jan 2006 05:50:27 +0000 (+0000)
Subject: *** empty log message ***
X-Git-Url: http://git.openbox.org/?a=commitdiff_plain;h=0f456a81f564c7b40bacfed61ff4bda4df0a900d;p=dana%2Furxvt.git

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

diff --git a/Changes b/Changes
index 78229dba..05ab8da5 100644
--- a/Changes
+++ b/Changes
@@ -9,12 +9,15 @@ WISH: OnTheSpot editing, or maybe switch to miiiiiiif
 WISH: just for fun, do shade and tint with XRender.
 WISH: support tex fonts
 
-TODO: document transient_for, vt
+TODO: document transient_for, vt and the grab etc. functionality
 
 	- perl: implement additional hook: line_update, add_lines.
         - perl: urxvt::line now can set via ->t and ->r.
         - perl: changed interpretation of --perl-ext-common and -pe.
-        - perl: much increased functionality, better overlays, popup support.
+        - perl: finally implemented --perl-eval.
+        - perl: much increased functionality, better overlays, popup support
+          and much much more.
+        - perl: anyevent support.
 
 6.3  Wed Jan  4 22:37:10 CET 2006
         - SECURITY FIX: on systems using openpty, permissions were
diff --git a/src/perl/selection b/src/perl/selection
index 1a0a4663..b0c1faf2 100644
--- a/src/perl/selection
+++ b/src/perl/selection
@@ -17,10 +17,13 @@ my @mark_patterns = (
       [ab-zA-Z0-9\-\@;\/?:&=%\$_+!*\x27(),~]   # do not include a trailing dot, its wrong too often
    )}x,
 
-   # common forms of quoting
-   qr{(?:^|\s) [‘`] ([^‘`’']+) [’'] (?:\s|$)}x,
+   # common "parentheses"
+   qr{(?:^|\s) ‘  ([^‘’]+?) ’  (?:\s|$)}x,
+   qr{(?:^|\s) `  ([^`']+?) '  (?:\s|$)}x,
+   qr{         \{ ([^{}]+?) \}         }x,
+   qr{         \[ ([^{}]+?) \]         }x,
 
-   # shell-like argument quoting
+   # shell-like argument quoting, basically always matches
    qr{\G [\ \t|&;<>()] *(
       (?:
          [^\\"'\ \t|&;<>()]+
diff --git a/src/urxvt.pm b/src/urxvt.pm
index 6dc7a9fd..d64d4df3 100644
--- a/src/urxvt.pm
+++ b/src/urxvt.pm
@@ -584,10 +584,18 @@ sub urxvt::destroy_hook(&) {
    bless \shift, urxvt::destroy_hook::
 }
 
-# urxvt::anyevent
-
 package urxvt::anyevent;
 
+=head2 The C<urxvt::anyevent> Class
+
+The sole purpose of this class is to deliver an interface to the
+C<AnyEvent> module - any module using it will work inside urxvt without
+further work. The only exception is that you cannot wait on condition
+variables, but non-blocking condvar use is ok. What this means is that you
+cannot use blocking APIs, but the non-blocking variant should work.
+
+=cut
+
 our $VERSION = 1;
 
 $INC{"urxvt/anyevent.pm"} = 1; # mark us as there