From 8ebb0bc40bc131a15fc729705052db618784a56e Mon Sep 17 00:00:00 2001
From: Bukz <bukizzle316@gmail.com>
Date: Wed, 27 Apr 2011 14:56:25 +0000
Subject: [PATCH] even more saved.cfg cleanup

git-svn-id: svn://svn.code.sf.net/p/actiongame/code/trunk/ac@6375 e016b1c5-ed68-44aa-a2f7-31cac88cffde
---
 config/defaults.cfg |  1 +
 config/on_quit.cfg  | 23 ++++++++++++++++++++++-
 2 files changed, 23 insertions(+), 1 deletion(-)

diff --git a/config/defaults.cfg b/config/defaults.cfg
index 3ca53e9e..c1799fa4 100644
--- a/config/defaults.cfg
+++ b/config/defaults.cfg
@@ -19,6 +19,7 @@ setfont default                     // Choose your font
 ofc_gamma_list = ""
 loop ogl (listlen $defaultmaps) [ add2list ofc_gamma_list $gamma ]
 
+tmpClientData =
 askquit = 1
 gfxqualityalias = 3   // Default GFX is medium.
 soundqualityalias = 3 // Default sound is best.
diff --git a/config/on_quit.cfg b/config/on_quit.cfg
index 085090d9..e95a9b33 100644
--- a/config/on_quit.cfg
+++ b/config/on_quit.cfg
@@ -1,6 +1,27 @@
 // Adds a list of aliases to be deleted (cleared from saved.cfg) on every quit.
 // Do not modify. (unless you really know what you're doing)
 
+// Restores aliases that were stored in saved.cfg as a list - for increased efficiency
+saveClientData = "curname LANG flystyle nickhighlight soundqualityalias dyngamma __gibsgore gfxqualityalias poniesmodeon old_editbinds askquit"
+
+if (! (checkalias afterinit)) [ afterinit = "" ]
+if (! (strstr $afterinit tmpClientData)) [
+  add2alias afterinit [ 
+    if (checkalias tmpClientData) [
+      if (= (listlen $tmpClientData) (listlen $saveClientData)) [
+        loop lcd (listlen $tmpClientData) [
+          (at $saveClientData $lcd) = (at $tmpClientData $lcd)
+        ]
+      ]
+    ]
+  ]
+]
+// Stores the data as a list
+addOnQuit [
+  tmpClientData = ""
+  loop scd (listlen $saveClientData) [ add2list tmpClientData (getalias (at $saveClientData $scd)) ]
+]
+
 addListOnQuit = [ alias_list = $arg1; loop al (listlen $alias_list) [ addOnQuit (concat "delalias" (at $alias_list $al)) ] ]
 
 on_quit_aliases = [
@@ -40,4 +61,4 @@ on_quit_aliases = [
   on_quit_aliases
 ]
 
-addListOnQuit $on_quit_aliases; addOnQuit [ delalias alias_list ]
\ No newline at end of file
+addListOnQuit $saveClientData; addListOnQuit $on_quit_aliases; addOnQuit [ delalias alias_list ]
\ No newline at end of file