diff --git a/lib/docs/filters/haskell/clean_html.rb b/lib/docs/filters/haskell/clean_html.rb
index 14ea2433..615f83de 100644
--- a/lib/docs/filters/haskell/clean_html.rb
+++ b/lib/docs/filters/haskell/clean_html.rb
@@ -65,6 +65,10 @@ module Docs
           end
         end
 
+        css('pre code').each do |node|
+          node.before(node.children).remove
+        end
+
         doc
       end
     end
diff --git a/lib/docs/filters/haskell/entries.rb b/lib/docs/filters/haskell/entries.rb
index 05986e14..ed590d2b 100644
--- a/lib/docs/filters/haskell/entries.rb
+++ b/lib/docs/filters/haskell/entries.rb
@@ -52,7 +52,7 @@ module Docs
         return [] if subpath.start_with?('users_guide')
         return [] if IGNORE_ENTRIES_PATHS.include?(subpath.split('/').last)
 
-        css('#synopsis > ul > li').each_with_object [] do |node, entries|
+        css('#synopsis > details > ul > li').each_with_object [] do |node, entries|
           link = node.at_css('a')
           name = node.content.strip
           name.remove! %r{\A(?:module|data|newtype|class|type family m|type)\s+}
@@ -75,7 +75,7 @@ module Docs
       end
 
       def include_default_entry?
-        subpath.start_with?('users_guide') || at_css('#synopsis > ul > li')
+        subpath.start_with?('users_guide') || at_css('#synopsis > details > ul > li')
       end
     end
   end
diff --git a/lib/docs/scrapers/haskell.rb b/lib/docs/scrapers/haskell.rb
index 8be5941e..442339b3 100755
--- a/lib/docs/scrapers/haskell.rb
+++ b/lib/docs/scrapers/haskell.rb
@@ -57,7 +57,7 @@ module Docs
     end
 
     version '8' do
-      self.release = '8.2.1'
+      self.release = '8.6.1'
       self.base_url = "https://downloads.haskell.org/~ghc/#{release}/docs/html/"
     end