Retaining custom style when creating a palette

Question

I created a style in a private stylesheet called "GreenStyle". Here it is

Cell[StyleData["GreenStyle"],
 FontColor -> RGBColor[0, 0.67, 0]]

In the notebook, I then created a button using this style.

Button[Style["My Button", "GreenStyle"],
 , ImageSize -> 120]

When I create a palette using this button, the color will not display as green for some reason.

CreatePalette[Button[Style["My Button", "GreenStyle"],
   , ImageSize -> 120]];

Can you explain why I'm getting this behavior? And what can I do to fix this?

Answer 1

Palette is a notebook so if you want to use that style there you have to set a stylesheet for it which will contain that style.

The solution is closely related to Inheriting Stylesheets when using CreateDocument but not as straightforward since your private stylesheet inherits from Default.nb while a palette should from Palette.nb.

Let's replace it then:

CreatePalette[
   Button[Style["My Button", "GreenStyle"], ImageSize -> 120],
   StyleDefinitions -> CurrentValue[
     EvaluationNotebook[], StyleDefinitions
   ] /. Cell[
      StyleData[StyleDefinitions -> "Default.nb"]] :> Cell[ 
      StyleData[StyleDefinitions -> "Palette.nb"]
   ]
];