From 11e7d7d3b2b8893bcfc96270590a8bb19c0e9b84 Mon Sep 17 00:00:00 2001
From: Abhinav Sarkar <abhinav@abhinavsarkar.net>
Date: Mon, 4 Jul 2016 17:09:04 +0530
Subject: [PATCH] Fixes a typo in a setting name.

---
 ringo-app/src/Ringo/ArgParser.hs           | 2 +-
 ringo/src/Ringo/Extractor.hs               | 2 +-
 ringo/src/Ringo/Generator/Populate/Fact.hs | 2 +-
 ringo/src/Ringo/Types/Internal.hs          | 4 ++--
 4 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/ringo-app/src/Ringo/ArgParser.hs b/ringo-app/src/Ringo/ArgParser.hs
index 883c526..579de56 100644
--- a/ringo-app/src/Ringo/ArgParser.hs
+++ b/ringo-app/src/Ringo/ArgParser.hs
@@ -43,7 +43,7 @@ settingsParser = let Settings {..} = defSettings
                          <> help ("Time unit granularity for fact tables. Possible values: "
                                     ++ intercalate ", " timeunits))
      <*> minorOption "avg-count-col-suffix"
-                     settingAvgCountColumSuffix
+                     settingAvgCountColumnSuffix
                      "Suffix for average count columns"
      <*> minorOption "avg-sum-col-suffix"
                      settingAvgSumColumnSuffix
diff --git a/ringo/src/Ringo/Extractor.hs b/ringo/src/Ringo/Extractor.hs
index 9afccea..da1f182 100644
--- a/ringo/src/Ringo/Extractor.hs
+++ b/ringo/src/Ringo/Extractor.hs
@@ -45,7 +45,7 @@ extractFactTable fact = do
           FactMax {..}           -> [ notNullSourceColumnRename factColSourceColumn cName ]
           FactMin {..}           -> [ notNullSourceColumnRename factColSourceColumn cName ]
           FactAverage {..}       ->
-            [ Column (cName <> settingAvgCountColumSuffix) countColType NotNull
+            [ Column (cName <> settingAvgCountColumnSuffix) countColType NotNull
             , notNullSourceColumnRename factColSourceColumn (cName <> settingAvgSumColumnSuffix)
             ]
           _                      -> []
diff --git a/ringo/src/Ringo/Generator/Populate/Fact.hs b/ringo/src/Ringo/Generator/Populate/Fact.hs
index 078a267..5ab1280 100644
--- a/ringo/src/Ringo/Generator/Populate/Fact.hs
+++ b/ringo/src/Ringo/Generator/Populate/Fact.hs
@@ -162,7 +162,7 @@ factTablePopulateStmts popMode fact = do
           FactMax {..}           -> [ (cName, app' "max" factColSourceColumn, False) ]
           FactMin {..}           -> [ (cName, app' "min" factColSourceColumn, False) ]
           FactAverage {..}       ->
-            [ ( cName <> settingAvgCountColumSuffix, app' "count" factColSourceColumn, False )
+            [ ( cName <> settingAvgCountColumnSuffix, app' "count" factColSourceColumn, False )
             , ( cName <> settingAvgSumColumnSuffix , app' "sum" factColSourceColumn  , False)
             ]
           _                      -> []
diff --git a/ringo/src/Ringo/Types/Internal.hs b/ringo/src/Ringo/Types/Internal.hs
index ebffbfc..a733aeb 100644
--- a/ringo/src/Ringo/Types/Internal.hs
+++ b/ringo/src/Ringo/Types/Internal.hs
@@ -121,7 +121,7 @@ data Settings = Settings
                 { settingDimPrefix                  :: !Text
                 , settingFactPrefix                 :: !Text
                 , settingTimeUnit                   :: !TimeUnit
-                , settingAvgCountColumSuffix        :: !Text
+                , settingAvgCountColumnSuffix       :: !Text
                 , settingAvgSumColumnSuffix         :: !Text
                 , settingDimTableIdColumnName       :: !Text
                 , settingDimTableIdColumnType       :: !Text
@@ -140,7 +140,7 @@ defSettings = Settings
               { settingDimPrefix                  = "dim_"
               , settingFactPrefix                 = "fact_"
               , settingTimeUnit                   = Minute
-              , settingAvgCountColumSuffix        = "_count"
+              , settingAvgCountColumnSuffix       = "_count"
               , settingAvgSumColumnSuffix         = "_sum"
               , settingDimTableIdColumnName       = "id"
               , settingDimTableIdColumnType       = "serial"