<pre>on restoreGlobals  put liste("variables globales") into globalVars  set itemDelimiter to tab  repeat with x = 1 to the number of lines of globalVars    put item 1 of line x of globalVars into varName    put item 2 of line x of globalVars into varValue    if varName is not empty and varName is not "varName"     and varValue is not empty and varValue is not "varValue" then      do "global" && varName      do "put" && quote & varValue & quote && "into" && varName    end if  end repeatend restoreGlobals</pre>