--- a/Tools__CompilerWarningToDoListEntry.st	Tue Mar 13 18:17:40 2007 +0100
+++ b/Tools__CompilerWarningToDoListEntry.st	Tue Mar 13 18:18:24 2007 +0100
@@ -143,11 +143,15 @@
 !CompilerWarningToDoListEntry methodsFor:'misc'!
 
 browse
-    |brwsr|
+    |brwsr pos|
 
     brwsr := UserPreferences browserClass 
         openInClass:(self problemClass) selector:selector.
-    brwsr codeView cursorToCharacterPosition:position.
+
+    (pos := position) isArray ifTrue:[
+        pos := position first.
+    ].
+    brwsr codeView cursorToCharacterPosition:pos.
 "/    brwsr codeView selectLine:(brwsr codeView cursorLine).
 
     "Created: / 22-10-2006 / 01:38:11 / cg"
@@ -212,5 +216,5 @@
 !CompilerWarningToDoListEntry class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__CompilerWarningToDoListEntry.st,v 1.5 2007-03-13 17:13:43 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__CompilerWarningToDoListEntry.st,v 1.6 2007-03-13 17:18:24 cg Exp $'
 ! !