Fixed myspace

This commit is contained in:
Michael Snoyman 2010-12-23 08:10:32 +02:00
parent 772afa0224
commit a38000b2f3

View File

@ -23,7 +23,7 @@ livejournal :: String -> String
livejournal u = concat ["http://", u, ".livejournal.com/"]
myspace :: String -> String
myspace = (++) "http://myspace.com/"
myspace = (++) "http://www.myspace.com/"
wordpress :: String -> String
wordpress u = concat ["http://", u, ".wordpress.com/"]