use vessel and other icons from info_cache

diff --git a/yarrg/where-vessels b/yarrg/where-vessels
index 092e8dad663e8c642edffc1cc92f8b59c2a16bd2..33df7f83c42aa44731c10a6327ff79a683fbbbd3 100755 (executable)
--- a/yarrg/where-vessels
+++ b/yarrg/where-vessels
@@ -304,14 +304,16 @@ proc vesselclasses-init {} {
 }
 
 proc load-icon {icon} {
-    image create bitmap icon/$icon -file icons/$icon.xbm
+    global info_cache
+    image create bitmap icon/$icon -file $info_cache/$icon.xbm
 }
 
 proc load-icon-combine {args} {
+    global info_cache
     set cmd {}
     set delim "pnmcat -lr "
     foreach icon $args {
-       append cmd $delim " <(xbmtopbm icons/$icon.xbm)"
+       append cmd $delim " <(xbmtopbm $info_cache/$icon.xbm)"
        set delim " <(pbmmake -white 1 1)"
     }
     append cmd " | pbmtoxbm"