X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhalcyon.git;a=blobdiff_plain;f=src%2FTwitter%2FStatus.hs;h=976ccb31590c134bcaa766cd3d718a4bdf9dd454;hp=e40bc6a6a718aa4b68e62902125859b128fc91ad;hb=85aa472950924557e80b793303d9b6dee0261c7c;hpb=606371fece618f28d3fedf182165ef3a56bf4159 diff --git a/src/Twitter/Status.hs b/src/Twitter/Status.hs index e40bc6a..976ccb3 100644 --- a/src/Twitter/Status.hs +++ b/src/Twitter/Status.hs @@ -131,7 +131,7 @@ parse_username word = matches = matchRegex username_regex word --- |Parse all usernames of the form @username from a status. +-- |Parse all usernames of the form \@username from a status. parse_usernames_from_status :: Status -> [String] parse_usernames_from_status status = catMaybes (map parse_username status_words)