update

1 files changed, 7 insertions, 4 deletions

diff --git a/BackendUrl.hs b/BackendUrl.hs
index 2bc34434b..ddeab9e04 100644
--- a/BackendUrl.hs
+++ b/BackendUrl.hs
@@ -9,16 +9,19 @@ backend = Backend {
 	name = "url",
 	getKey = keyValue,
 	storeFileKey = dummyStore,
-	retrieveKeyFile = downloadUrl
+	retrieveKeyFile = downloadUrl,
+	removeKey = dummyRemove
 }
 
 -- cannot generate url from filename
 keyValue :: GitRepo -> FilePath -> IO (Maybe Key)
 keyValue repo file = return Nothing
 
--- cannot store to urls
-dummyStore :: GitRepo -> FilePath -> Key -> IO (Bool)
+-- cannot change urls
+dummyStore :: GitRepo -> FilePath -> Key -> IO Bool
 dummyStore repo file url = return False
+dummyRemove :: Key -> IO Bool
+dummyRemove url = return False
 
-downloadUrl :: IO Key -> FilePath -> IO (Bool)
+downloadUrl :: Key -> FilePath -> IO Bool
 downloadUrl url file = error "downloadUrl unimplemented"