Vault.hs

module Festung.Vault 
  ( extension
  , isVault
  ) where

import System.FilePath (takeExtension)


extension :: String
extension = ".sqlcipher"


isVault :: FilePath -> Bool
isVault filename = takeExtension filename == extension