diff --git a/examples/Simple.hs b/examples/Simple.hs
index c115693..0370ef7 100644
--- a/examples/Simple.hs
+++ b/examples/Simple.hs
@@ -21,7 +21,7 @@ getDanglingLinks = find always (fileType ==? SymbolicLink &&?
 renameCppToC :: FilePath -> IO ()
 
 renameCppToC path = find always (extension ==? ".cpp") path >>=
-    mapM_ (renameWith (replaceExtension ".C"))
+                    mapM_ (renameWith (replaceExtension ".C"))