(minor) remove a useless line.

beta
Philippe Pittoli 2023-07-03 00:20:55 +02:00
parent 850d61678a
commit 3dddbf6990
1 changed files with 0 additions and 1 deletions

View File

@ -465,7 +465,6 @@ handleAction = case _ of
build_new_domain :: String -> String -> String build_new_domain :: String -> String -> String
build_new_domain sub tld build_new_domain sub tld
| sub == "" = "." <> tld
| endsWith "." sub = sub <> tld | endsWith "." sub = sub <> tld
| otherwise = sub <> "." <> tld | otherwise = sub <> "." <> tld