From c84e737c3f64030dc9b66ddb931cac757e9ba986 Mon Sep 17 00:00:00 2001
From: Russ Cox <rsc@swtch.com>
Date: Wed, 27 Oct 2010 17:31:18 -0700
Subject: plumb: column numbers in file address

R=rsc
http://codereview.appspot.com/2776042
---
 plumb/basic    | 9 +++++++++
 plumb/fileaddr | 1 +
 2 files changed, 10 insertions(+)

diff --git a/plumb/basic b/plumb/basic
index c89b6c2d..d40f6a4b 100644
--- a/plumb/basic
+++ b/plumb/basic
@@ -59,6 +59,15 @@ arg isfile	$0
 plumb to openoffice
 plumb start openoffice $file
 
+# existing files tagged by line number:columnumber or linenumber.columnumber, go to editor
+type is text
+data matches '([.a-zA-Z¡-￿0-9_/\-]*[a-zA-Z¡-￿0-9_/\-])'$twocolonaddr'
+arg isfile     $1
+data set       $file
+attr add       addr=$2-#0+#$3
+plumb to edit
+plumb client $editor
+
 # existing files, possibly tagged by line number, go to editor
 type is text
 data matches '([.a-zA-Z¡-￿0-9_/\-]*[a-zA-Z¡-￿0-9_/\-])('$addr')?'
diff --git a/plumb/fileaddr b/plumb/fileaddr
index 0f08dc3e..cd2f120f 100644
--- a/plumb/fileaddr
+++ b/plumb/fileaddr
@@ -1,3 +1,4 @@
 addrelem='((#?[0-9]+)|(/[A-Za-z0-9_\^]+/?)|[.$])'
 addr=:($addrelem([,;+\-]$addrelem)*)
 
+twocolonaddr = :([0-9]+)[:.]([0-9]+)
-- 
cgit v1.2.3