--- rxvt-unicode/src/perl/selection 2007/11/19 09:26:41 1.43 +++ rxvt-unicode/src/perl/selection 2007/11/19 09:29:46 1.46 @@ -50,10 +50,10 @@ qr{ (? }x, - qr{ \( ([^`']+) \) }x, - qr{ \{ ([^`']+) \} }x, - qr{ \[ ([^`']+) \] }x, + qr{ \< ([^\>]+) \> }x, + qr{ \( ([^\)]+) \) }x, + qr{ \{ ([^\}]+) \} }x, + qr{ \[ ([^\]]+) \] }x, # urls, just a heuristic qr{(