Fix name-shadowing error in Setup.hs

Setup.hs

@@ -61,17 +61,17 @@ sdlConfHook (description, buildInfo) flags = do
     putStrLn "\ESC[34mGetting local build info\ESC[m"
     localBuildInfo <- confHook simpleUserHooks (description, buildInfo) flags
     let packageDescription = localPkgDescr localBuildInfo
-        library = fromJust $ library packageDescription
-        libraryBuildInfo = libBuildInfo library
+        localLibrary = fromJust $ library packageDescription
+        localLibraryBuildInfo = libBuildInfo localLibrary
     putStrLn "\ESC[34mGetting current directory\ESC[m"
     dir <- getCurrentDirectory
-    putStrLn "\ESC[34mAdding SDL include and lib directories: " ++ dir ++ "\ESC[m"
+    putStrLn $ "\ESC[34mAdding SDL include and lib directories: " ++ dir ++ "\ESC[m"
     pure localBuildInfo {
         localPkgDescr = packageDescription {
-            library = Just $ library {
-                libBuildInfo = libraryBuildInfo {
-                    includeDirs = (dir ++ "/sdl2_win_mingw/include"):(includeDirs libraryBuildInfo),
-                    extraLibDirs = (dir ++ "/sdl2_win_mingw/lib"):(extraLibDirs libraryBuildInfo)
+            library = Just $ localLibrary {
+                libBuildInfo = localLibraryBuildInfo {
+                    includeDirs = (dir ++ "/sdl2_win_mingw/include"):(includeDirs localLibraryBuildInfo),
+                    extraLibDirs = (dir ++ "/sdl2_win_mingw/lib"):(extraLibDirs localLibraryBuildInfo)
                 }
             }
         }