From: root Date: Thu, 12 Jan 2006 10:21:50 +0000 (+0000) Subject: *** empty log message *** X-Git-Url: http://git.openbox.org/?a=commitdiff_plain;h=c85334a039c51ed0b65f3a09f206007fff377ca8;p=dana%2Furxvt.git *** empty log message *** --- diff --git a/src/perl/selection b/src/perl/selection index 0d29e946..525ee86f 100644 --- a/src/perl/selection +++ b/src/perl/selection @@ -11,13 +11,14 @@ sub on_keyboard_command { # "find interetsing things"-patterns my @mark_patterns = ( - qr{([[:alnum:]]+)}, + qr{([[:word:]]+)}, # common "parentheses" qr{(?:^|\s) ‘ ([^‘’]+?) ’ (?:\s|\)|$)}x, qr{(?:^|\s) ` ([^`']+?) ' (?:\s|\)|$)}x, qr{ \{ ([^{}]+?) \} }x, qr{ \[ ([^{}]+?) \] }x, + qr{ \( ([^()]+?) \) }x, # urls, just a heuristic qr{(