check for ::pd_colors before init to avoid error in vanilla

color-themes-plugin.tcl

@@ -480,8 +480,14 @@ proc ::color-themes::init {mymenu} {
     close $fp
 }
 
-if {$::windowingsystem eq "aqua"} {
-    ::color-themes::init .menubar.apple.preferences
+#for some reason returning from source didn't work
+if {![array exists ::pd_colors]} {
+    ::pdwindow::post "color-themes: no ::pd_colors array: skipping\n"
+    #return not working here
 } else {
-    ::color-themes::init .menubar.file.preferences
+    if {$::windowingsystem eq "aqua"} {
+        ::color-themes::init .menubar.apple.preferences
+    } else {
+        ::color-themes::init .menubar.file.preferences
+    }
 }

themes/pd-extended-theme-plugin.tcl

@@ -1,7 +1,6 @@
 array set ::pd_colors {
 selected "#00f"
 signal_iolet "#558"
-signal_iolet_border "#558"
 msg_iolet "#fff"
 obj_box_outline "#ccc"
 obj_box_fill "#f6f8f8"