How to assign options to a variable?

Question

I want to redefine a function similar to Plot like this:

newPlot[func_, range_, prop___] := Plot[func, range, prop, GridLines -> something, 
                                        FrameStyle -> something]

To be more flexible, I'd like to write it more in the following way:

moreProp = GridLines -> something, FrameStyle -> something
newPlot[func_, range_, prop___] := Plot[func, range, prop, moreProp]

Unfortunately it's not working. What's the necessary syntax than for moreProp

I just edited the question for more clarification (I hope).

Answer 1

This is one aspect of a classic problem: Plot is HoldAll. So, moreProp is not being evaluated. I think the most effective way to work around this is to use With (cf. this question) to inject the values into Plot, e.g.

newPlot[func_, range_, prop___] := 
 With[{mp = moreProp}, Plot[func, range, prop, mp]]

Then, it works:

Alternatively, you can use

newPlot2[func_, range_, prop___] := Plot[func, range, prop, #] & @ moreProp

which performs a similar injection.

As was pointed out in the comments, Plot accepts lists of options, so the above methods work. But, if Plot did not do this, you could use one of the following two methods:

newPlot3[func_, range_, prop__] := 
 With[{mp = Sequence@@Flatten[{prop, moreProp}]},
  Plot[func, range, mp]
 ]

or

newPlot4[func_, range_, prop__] := 
  Plot[func, range, prop, ##]& @@ Flatten[{moreProp}]