$OpenBSD: patch-src_wnb,v 1.2 2008/09/01 20:02:53 sthen Exp $ --- src/wnb.orig Tue Sep 11 11:41:42 2007 +++ src/wnb Tue Sep 11 11:41:47 2007 @@ -103,7 +103,7 @@ set version "3.0" if {$tcl_platform(platform) == "unix"} { if {[lsearch -exact [array names env] WNHOME] == -1} { - set resourcedir "/usr/local/WordNet-3.0/lib/wnres" + set resourcedir "${LOCALBASE}/share/wordnet/lib/wnres" } else { set resourcedir "$env(WNHOME)/lib/wnres" } @@ -357,7 +357,7 @@ proc searchanddisplay {searchword senses posnumber sea if {$index != -1 && $schar != 0} { set line [string range $i 0 [expr $index - 1]] if {[regexp -indices -nocase -- \ - "(\[\.\})>,\] |^|, )($morphedword)\[0-9\]*(#\[0-9\]+)?( \[(\]|,|$\)" \ + "(\[\.\})>,\] |^|, )($morphedword)\[0-9\]*(#\[0-9\]+)?( \[(\]|,|$)" \ $line dummy dummy indices]} { .results.text tag add overviewhighlight \ "end - 2 lines linestart + [lindex $indices 0] chars" \