2011-03-30 05:32:05 +00:00
|
|
|
-- stub for when hS3 is not available
|
|
|
|
|
module Remote.S3 (remote) where
|
|
|
|
|
|
2011-06-10 16:06:40 +00:00
|
|
|
import Types.Remote
|
2011-03-30 05:32:05 +00:00
|
|
|
import Types
|
|
|
|
|
|
2011-12-31 08:11:39 +00:00
|
|
|
remote :: RemoteType
|
2011-03-30 05:32:05 +00:00
|
|
|
remote = RemoteType {
|
|
|
|
|
typename = "S3",
|
|
|
|
|
enumerate = return [],
|
|
|
|
|
generate = error "S3 not enabled",
|
|
|
|
|
setup = error "S3 not enabled"
|
|
|
|
|
}
|
