Use an exact match for the "Full Story" link text.
authorMichael Orlitzky <michael@orlitzky.com>
Fri, 13 Jul 2012 03:26:36 +0000 (23:26 -0400)
committerMichael Orlitzky <michael@orlitzky.com>
Fri, 13 Jul 2012 03:26:36 +0000 (23:26 -0400)
src/LWN/XHTML.hs

index a2f103fa0d83b7ae433f239036e02456eb6e08f3..5d3bbd17327a8eaf20bec29152ed30de9aa9c7df 100644 (file)
@@ -16,7 +16,6 @@ module LWN.XHTML (
 where
 
 import Text.HandsomeSoup (css)
-import Text.Regex.Posix ((=~))
 import Text.XML.HXT.Core (
   (>>>),
   (/>),
@@ -163,7 +162,7 @@ full_story_link =
   hasName "a"
   >>>
   ifA
-    (this /> hasText (=~ "Full Story"))
+    (this /> hasText (== "Full Story"))
     this
     none