couple of windows indentation fixes in source files

lib/GHCup.hs

@@ -1296,25 +1296,26 @@ rmGhcup = do
   let ghcupFilepath = binDir </> ghcupFilename
   currentRunningExecPath <- liftIO $ getExecutablePath
   if currentRunningExecPath == ghcupFilepath
-  then do
+    then
+      do
 #if defined(IS_WINDOWS)
-  -- since it doesn't seem possible to delete a running exec in windows
+    -- since it doesn't seem possible to delete a running exec in windows
-  -- we move it to temp dir, to be deleted at next reboot
+    -- we move it to temp dir, to be deleted at next reboot
-    tempDir <- liftIO $ getTemporaryDirectory
+        tempDir <- liftIO $ getTemporaryDirectory
-    let tempFilepath = tempDir </> ghcupFilename
+        let tempFilepath = tempDir </> ghcupFilename
-      hideError UnsupportedOperation $
+        hideError UnsupportedOperation $
-              liftIO $ hideError NoSuchThing $
+                  liftIO $ hideError NoSuchThing $
-              Win32.moveFileEx ghcupFilepath (Just tempFilepath) 1
+                  Win32.moveFileEx ghcupFilepath (Just tempFilepath) 1
 #else
-         -- delete it.
+    -- delete it.
-    hideError doesNotExistErrorType $ liftIO $ rmFile ghcupFilepath
+        hideError doesNotExistErrorType $ liftIO $ rmFile ghcupFilepath
 #endif
-   else
+    else
       $logWarn $
       nonStandardInstallLocationMsg currentRunningExecPath
 
-   where
+  where
-     nonStandardInstallLocationMsg path = T.pack $
+    nonStandardInstallLocationMsg path = T.pack $
       "current ghcup is invoked from a non-standard location: \n"
       <> path <>
       "\n you may have to uninstall it manually."