UpdateInfoButtonHelp: Set machine-readable text for C&P

By accepting the text wave to be pretty printed we can let the visualized
data and the data copied to the clipboard differ so that the latter can be
more easily C&P'ed into tab calculations like Excel/Calc.

Author: t-b

Packages/MIES/MIES_SweepFormula_PSX.ipf

@@ -2423,7 +2423,8 @@ static Function PSX_FitAcceptAverage(string win, DFREF averageDFR, WAVE eventOns
 
 	specialEventPanel = PSX_GetSpecialPanel(win)
 
-	UpdateInfoButtonHelp(specialEventPanel, "button_fit_results", PSX_AVERAGE_FIT_RESULT_DEFAULT_HELP)
+	Make/T/FREE help = {PSX_AVERAGE_FIT_RESULT_DEFAULT_HELP}
+	UpdateInfoButtonHelp(specialEventPanel, "button_fit_results", help)
 
 	if(!GetCheckBoxState(specialEventPanel, "checkbox_average_events_fit"))
 		FastOp acceptedAverageFit = (NaN)
@@ -2551,8 +2552,7 @@ static Function PSX_FitAcceptAverage(string win, DFREF averageDFR, WAVE eventOns
 
 	Concatenate/NP/FREE {InputAvg, InputRise, InputDecay}, input
 
-	str = FormatTextWaveForLegend(input)
-	UpdateInfoButtonHelp(specialEventPanel, "button_fit_results", str)
+	UpdateInfoButtonHelp(specialEventPanel, "button_fit_results", input)
 
 	browser = SFH_GetBrowserForFormulaGraph(win)
 	PSX_StoreIntoResultsWave(browser, SFH_RESULT_TYPE_PSX_MISC, input, "accepted average fit results")
@@ -4331,9 +4331,8 @@ static Function PSX_AddLegend(string win, WAVE/WAVE results)
 
 	JSON_Release(jsonID)
 
-	str        = FormatTextWaveForLegend(input)
 	mainWindow = GetMainWindow(win)
-	UpdateInfoButtonHelp(mainWindow, "button_psx_info", str)
+	UpdateInfoButtonHelp(mainWindow, "button_psx_info", input)
 End
 
 /// @brief Return the event, wave and combo index
@@ -5945,7 +5944,8 @@ Function PSX_PlotStartupSettings()
 
 		for(ctrl : infoButtons)
 			if(ControlExists(subwin, ctrl))
-				UpdateInfoButtonHelp(subwin, ctrl, NONE)
+				Make/T/FREE help = {NONE}
+				UpdateInfoButtonHelp(subwin, ctrl, help)
 			endif
 		endfor
 	endfor

Packages/MIES/MIES_Utilities_GUI.ipf

@@ -387,11 +387,15 @@ Function IsValidTraceDisplayMode(variable traceDisplayCode)
 End
 
 /// @brief Update the help and user data of a button used as info/copy button
-Function UpdateInfoButtonHelp(string win, string ctrl, string content)
+Function UpdateInfoButtonHelp(string win, string ctrl, WAVE info)
 
-	string htmlStr = "<pre>" + content + "</pre>"
+	string gui, calc, htmlStr
 
-	Button $ctrl, win=$win, help={htmlStr}, userdata=content
+	calc    = TextWaveToList(info, "\n", colSep = ";")
+	gui     = FormatTextWaveForLegend(info)
+	htmlStr = "<pre>" + gui + "</pre>"
+
+	Button $ctrl, win=$win, help={htmlStr}, userdata=calc
 End
 
 /// @brief Custom graph marquee