From 981b746752ac0c4635bac50051e7a2632ad3a252 Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sun, 3 Mar 2013 17:04:12 +0000
Subject: [PATCH] Rename local variable to what it stands for.

---
 source/options.pas | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/source/options.pas b/source/options.pas
index 7cf17db4..5490a118 100644
--- a/source/options.pas
+++ b/source/options.pas
@@ -875,12 +875,12 @@ end;
 
 procedure Toptionsform.InitLanguages;
 var
-  AllLangCodes: TStringList;
+  AvailLangCodes: TStringList;
 
   procedure AddLang(LangCode, LangName: String);
   begin
     LangCode := LowerCase(LangCode);
-    if AllLangCodes.IndexOf(LangCode) > -1 then
+    if AvailLangCodes.IndexOf(LangCode) > -1 then
       FLanguages.Add(LangCode + FLanguages.NameValueSeparator + LangName);
   end;
 
@@ -889,8 +889,8 @@ begin
   // List taken from dxgettext/languagecodes.pas
   FLanguages := TStringList.Create;
   FLanguages.Add('' + FLanguages.NameValueSeparator + _('Auto detect'));
-  AllLangCodes := TStringList.Create;
-  DefaultInstance.GetListOfLanguages('default', AllLangCodes);
+  AvailLangCodes := TStringList.Create;
+  DefaultInstance.GetListOfLanguages('default', AvailLangCodes);
   AddLang('aa', 'Afar');
   AddLang('aa', 'Afar');
   AddLang('ab', 'Abkhazian');
@@ -1085,7 +1085,7 @@ begin
   AddLang('za', 'Zhuang');
   AddLang('zh', 'Chinese');
   AddLang('zu', 'Zulu');
-  AllLangCodes.Free;
+  AvailLangCodes.Free;
 end;