From 2b1e95b5165df6ccb5b5c8959b65221ce25f6a93 Mon Sep 17 00:00:00 2001
From: Seb Shader <sebfumaster@aol.com>
Date: Tue, 3 Jan 2023 18:58:13 -0800
Subject: [PATCH] Add new graph_open for open GOPs

---
 color-themes-plugin.tcl       |  1 +
 themes/sebs-colors-plugin.tcl | 89 ++++++++++++++++++-----------------
 2 files changed, 46 insertions(+), 44 deletions(-)

diff --git a/color-themes-plugin.tcl b/color-themes-plugin.tcl
index 1e09b4a..7d99f12 100644
--- a/color-themes-plugin.tcl
+++ b/color-themes-plugin.tcl
@@ -48,6 +48,7 @@ proc ::color-themes::reset_defaults {} {
         comment "#000"
         graph_outline "#000"
         graph_text "#000"
+        graph_open "#c0c0c0"
         array_name "#000"
         array_values "#000"
         gop_box "#FF8080"
diff --git a/themes/sebs-colors-plugin.tcl b/themes/sebs-colors-plugin.tcl
index fed1381..c22c919 100644
--- a/themes/sebs-colors-plugin.tcl
+++ b/themes/sebs-colors-plugin.tcl
@@ -40,49 +40,50 @@
 # helpbrowser_highlight - like txt_highlight but for help browser
 
 array set ::pd_colors {
-canvas_fill "#FF8800"
-gop_box "black"
-obj_box_text "#00FF00"
-msg_box_text "white"
-comment "blue"
-selected "yellow"
-obj_box_outline_broken "light blue"
-obj_box_outline "#0B8100"
-msg_box_outline "purple"
-msg_box_fill "purple"
-obj_box_fill "#0B8100"
-signal_cord "blue"
-msg_cord "black"
-msg_iolet "white"
-signal_iolet "blue"
-graph_outline "blue"
-selection_rectangle "light green"
-txt_highlight "black"
-graph_text "purple"
-array_name "#0B8100"
-array_values "purple"
-atom_box_fill "black"
-atom_box_text "cyan"
-atom_box_label "black"
-atom_box_outline "cyan"
-atom_box_focus_outline "red"
-text_window_fill "black"
-text_window_text "white"
-text_window_highlight "green"
-text_window_hl_text "white"
-text_window_cursor "green"
-pdwindow_fill "#000"
-pdwindow_fatal_text "#D00"
-pdwindow_fatal_highlight "#FFE0E8"
-pdwindow_error_text "#D00"
-pdwindow_post_text "deep sky blue"
-pdwindow_debug_text "green"
-pdwindow_hl_text "blue"
-helpbrowser_fill "#000"
-helpbrowser_text "deep sky blue"
-helpbrowser_highlight "red"
-canvas_text_cursor "deep sky blue"
-helpbrowser_hl_text "white"
+    canvas_fill "#FF8800"
+    gop_box "black"
+    obj_box_text "#00FF00"
+    msg_box_text "white"
+    comment "blue"
+    selected "yellow"
+    obj_box_outline_broken "light blue"
+    obj_box_outline "#0B8100"
+    msg_box_outline "purple"
+    msg_box_fill "purple"
+    obj_box_fill "#0B8100"
+    signal_cord "blue"
+    msg_cord "black"
+    msg_iolet "white"
+    signal_iolet "blue"
+    graph_outline "blue"
+    graph_open "white"
+    selection_rectangle "light green"
+    txt_highlight "black"
+    graph_text "purple"
+    array_name "#0B8100"
+    array_values "purple"
+    atom_box_fill "black"
+    atom_box_text "cyan"
+    atom_box_label "black"
+    atom_box_outline "cyan"
+    atom_box_focus_outline "red"
+    text_window_fill "black"
+    text_window_text "white"
+    text_window_highlight "green"
+    text_window_hl_text "white"
+    text_window_cursor "green"
+    pdwindow_fill "#000"
+    pdwindow_fatal_text "#D00"
+    pdwindow_fatal_highlight "#FFE0E8"
+    pdwindow_error_text "#D00"
+    pdwindow_post_text "deep sky blue"
+    pdwindow_debug_text "green"
+    pdwindow_hl_text "blue"
+    helpbrowser_fill "#000"
+    helpbrowser_text "deep sky blue"
+    helpbrowser_highlight "red"
+    canvas_text_cursor "deep sky blue"
+    helpbrowser_hl_text "white"
 }
 set ::pd_colors(txt_highlight_front) "$::pd_colors(selected)"
 set ::pd_colors(msg_iolet_border) "blue"
@@ -107,4 +108,4 @@ set ::pd_colors(signal_iolet_border) $::pd_colors(signal_cord)
 # 	}	
 # }
 # 
-# trace variable ::curve_cords w redraw_cords
\ No newline at end of file
+# trace variable ::curve_cords w redraw_cords