diff options
| author | Ricardo Wurmus <rekado@elephly.net> | 2021-08-07 12:31:38 +0200 |
|---|---|---|
| committer | Ricardo Wurmus <rekado@elephly.net> | 2021-08-07 12:31:38 +0200 |
| commit | 7f69c4ed4d11a3c83db6c3e7e11f6201d40488ac (patch) | |
| tree | 4a5f1197aad5f95e37cb501b74c0e6d6a546fe7a | |
| parent | b517c0c4160e80c2f8a86f2773e2464e5e9aeb01 (diff) | |
request: Set fallback default region last.
| -rw-r--r-- | aws/request.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/aws/request.scm b/aws/request.scm index 2a3c151..6acb6fc 100644 --- a/aws/request.scm +++ b/aws/request.scm @@ -49,13 +49,13 @@ ;;; Code: (define %aws-default-region - (make-parameter (or (getenv "AWS_DEFAULT_REGION") - "us-west-2"))) + (make-parameter (getenv "AWS_DEFAULT_REGION"))) (define %get-aws-default-region (lambda () - (or (getenv "AWS_DEFAULT_REGION") - (%aws-default-region)))) + (or (%aws-default-region) + (getenv "AWS_DEFAULT_REGION") + "us-west-2"))) (define %aws-access-key (make-parameter (getenv "AWS_ACCESS_KEY_ID"))) |