derive-has-field-0.0.1.0: test/Import.hs

module Import where

import Data.List (stripPrefix)
import Data.Maybe (fromMaybe)

dropPrefix :: String -> String -> String
dropPrefix prefix input = fromMaybe input $ stripPrefix prefix input