@@ -44,7 +44,7 @@ macro usingPlotPackage()
4444 println (" $expr " )
4545 return esc ( :(using $ PlotPackage) )
4646 end
47-
47+
4848 else
4949 @info " No plot package activated. Using \" SilentNoPlot\" ."
5050 @goto USE_NO_PLOT
9191function usePlotPackage (plotPackage:: String ; pushPreviousOnStack= true ):: Bool
9292 success = true
9393 if plotPackage == " NoPlot" || plotPackage == " SilentNoPlot"
94- if pushPreviousOnStack && haskey (ENV , " SignalTablesPlotPackage" )
95- push! (PlotPackagesStack, ENV [" SignalTablesPlotPackage" ])
94+ newPlot = true
95+ if pushPreviousOnStack
96+ if haskey (ENV , " SignalTablesPlotPackage" )
97+ push! (PlotPackagesStack, ENV [" SignalTablesPlotPackage" ])
98+ elseif haskey (ENV , " MODIA_PLOT_PACKAGE" )
99+ push! (PlotPackagesStack, ENV [" MODIA_PLOT_PACKAGE" ])
100+ newPlot= false
101+ end
96102 end
97103 if plotPackage == " NoPlot"
98- ENV [" SignalTablesPlotPackage" ] = " NoPlot"
104+ if newPlot
105+ ENV [" SignalTablesPlotPackage" ] = " NoPlot"
106+ else
107+ ENV [" MODIA_PLOT_PACKAGE" ] = " NoPlot"
108+ end
99109 else
100- ENV [" SignalTablesPlotPackage" ] = " SilentNoPlot"
110+ if newPlot
111+ ENV [" SignalTablesPlotPackage" ] = " SilentNoPlot"
112+ else
113+ ENV [" MODIA_PLOT_PACKAGE" ] = " SilentNoPlot"
114+ end
101115 end
102116 else
103117 plotPackageName = " SignalTablesInterface_" * plotPackage
104118 if plotPackage in AvailablePlotPackages
105119 # Check that plotPackage is defined in current environment
106120 if isinstalled (plotPackageName)
107- if pushPreviousOnStack && haskey (ENV , " SignalTablesPlotPackage" )
108- push! (PlotPackagesStack, ENV [" SignalTablesPlotPackage" ])
121+ newPlot = true
122+ if pushPreviousOnStack
123+ if haskey (ENV , " SignalTablesPlotPackage" )
124+ push! (PlotPackagesStack, ENV [" SignalTablesPlotPackage" ])
125+ elseif haskey (ENV , " MODIA_PLOT_PACKAGE" )
126+ push! (PlotPackagesStack, ENV [" MODIA_PLOT_PACKAGE" ])
127+ newPlot= false
128+ end
129+ end
130+ if newPlot
131+ ENV [" SignalTablesPlotPackage" ] = plotPackage
132+ else
133+ ENV [" MODIA_PLOT_PACKAGE" ] = plotPackage
109134 end
110- ENV [" SignalTablesPlotPackage" ] = plotPackage
111135 else
112136 @warn " ... usePlotPackage(\" $plotPackage \" ): Call ignored, since package $plotPackageName is not in your current environment"
113137 success = false
@@ -132,9 +156,9 @@ function usePreviousPlotPackage()::Bool
132156 if length (PlotPackagesStack) > 0
133157 plotPackage = pop! (PlotPackagesStack)
134158 success = usePlotPackage (plotPackage, pushPreviousOnStack= false )
135- else
136- @warn " usePreviousPlotPackage(): Call ignored, because nothing saved."
137- success = false
159+ # else
160+ # @warn "usePreviousPlotPackage(): Call ignored, because nothing saved."
161+ # success = false
138162 end
139163 return success
140164end
@@ -148,7 +172,5 @@ defined with [`usePlotPackage`](@ref).
148172For example, the function may return "GLMakie", "PyPlot" or "NoPlot" or
149173or "", if no PlotPackage is defined.
150174"""
151- currentPlotPackage () = haskey (ENV , " SignalTablesPlotPackage" ) ? ENV [" SignalTablesPlotPackage" ] : " "
152-
153-
154-
175+ currentPlotPackage () = haskey (ENV , " SignalTablesPlotPackage" ) ? ENV [" SignalTablesPlotPackage" ] :
176+ (haskey (ENV , " MODIA_PLOT_PACKAGE" ) ? ENV [" MODIA_PLOT_PACKAGE" ] : " " )
0 commit comments