ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/perl/selection
(Generate patch)

Comparing rxvt-unicode/src/perl/selection (file contents):
Revision 1.48 by root, Mon Nov 19 09:31:06 2007 UTC vs.
Revision 1.49 by root, Mon Nov 19 15:52:13 2007 UTC

32 () 32 ()
33} 33}
34 34
35# "find interesting things"-patterns 35# "find interesting things"-patterns
36my @mark_patterns = ( 36my @mark_patterns = (
37 qr{ ([[:word:]]+) }x, 37# qr{ ([[:word:]]+) }x,
38 qr{ ([^[:space:]]+) }x, 38 qr{ ([^[:space:]]+) }x,
39 39
40 # common types of "parentheses" 40 # common types of "parentheses"
41 qr{ (?<![^[:space:]]) ` ([^‘’]+) ` (?![^[:space:]]) }x, 41 qr{ (?<![^[:space:]]) ` ([^‘’]+) ` (?![^[:space:]]) }x,
42 qr{ (?<![^[:space:]]) ‘ ([^‘’]+) ’ (?![^[:space:]]) }x, 42 qr{ (?<![^[:space:]]) ‘ ([^‘’]+) ’ (?![^[:space:]]) }x,

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines