convertPath xs =
    -- the WAI paths include a blank for the trailing slash
    case reverse xs of
      ("":rest) -> map T.unpack (reverse rest)
      _ -> map T.unpack xs
convertPath xs =
    -- the WAI paths include a blank for the trailing slash
    case reverse xs of
      ("":rest) -> map T.unpack (reverse rest)
      _ -> map T.unpack xs
convertPath xs =
    -- the WAI paths include a blank for the trailing slash
    case reverse xs of
      ("":rest) -> map T.unpack (reverse rest)
      _ -> map T.unpack xs