commit 886f121bc35301c5f0d167be6bc02a1b364b2bf8
from: rsc <devnull@localhost>
date: Fri Jan 07 19:17:58 2005 UTC

bug fix

commit - 474ef694962718ddf82f93f841f91ee0a1dc6252
commit + 886f121bc35301c5f0d167be6bc02a1b364b2bf8
blob - 979c6473da7536d46524649f331f7b1d9781d46f
blob + 2d8156dfa4f6a36aaff2205150a97a96084efa0d
--- bin/adict
+++ bin/adict
@@ -7,11 +7,13 @@ fn event {
 	# $2 - c2 type of action
 	# $3 - q0 beginning of selection
 	# $4 - q1 end of selection
-	# $5 - flag
-	# $6 - nr number of runes in $7
-	# $7 - text
-	# $8 - chorded argument
-	# $9 - origin of chorded argument
+	# $5 - eq0 beginning of expanded selection
+	# $6 - eq1 end of expanded selection
+	# $7 - flag
+	# $8 - nr number of runes in $7
+	# $9 - text
+	# $10 - chorded argument
+	# $11 - origin of chorded argument
 
 	switch($1$2){
 	case E*	# write to body or tag
@@ -28,9 +30,9 @@ fn event {
 	case Ml ML	# button 3 in tag or body
 		{
 			if(~ $dict NONE)
-				dictwin /adict/$7/ $7
+				dictwin /adict/$9/ $9
 			if not
-				dictwin /adict/$dict/$7 $dict $7
+				dictwin /adict/$dict/$9 $dict $9
 		} &
 	}
 }