Mercurial Mercurial > hedgewars / comparison
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gameServer/Utils.hs
changeset 12114 cdadc1d487f1
parent 11838 8f730ba4ca3c
child 12834 148c9524f38d
equal deleted inserted replaced
12113:72f5d670bbee 12114:cdadc1d487f1 
   243 sanitizeName :: B.ByteString -> B.ByteString
 
   243 sanitizeName :: B.ByteString -> B.ByteString
 
   244 sanitizeName = B.map sc
 
   244 sanitizeName = B.map sc
 
   245     where
 
   245     where
 
   246         sc c | isAlphaNum c = c
 
   246         sc c | isAlphaNum c = c
 
   247              | otherwise = '_'
 
   247              | otherwise = '_'
 
       
   248 
       
   249 isRegistered :: ClientInfo -> Bool
 
       
   250 isRegistered = (<) 0 . B.length . webPassword
hedgewars