summaryrefslogtreecommitdiff
path: root/Remote/S3stub.hs
blob: d91a222e86701ff3dd0588f5307cf7eed2f9ebeb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
-- stub for when hS3 is not available
module Remote.S3 (remote) where

import Types.Remote
import Types

remote :: RemoteType Annex
remote = RemoteType {
	typename = "S3",
	enumerate = return [],
	generate = error "S3 not enabled",
	setup = error "S3 not enabled"
}