From 7f69c4ed4d11a3c83db6c3e7e11f6201d40488ac Mon Sep 17 00:00:00 2001 From: Ricardo Wurmus Date: Sat, 7 Aug 2021 12:31:38 +0200 Subject: request: Set fallback default region last. --- aws/request.scm | 8 ++++---- 1 file 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"))) -- cgit v1.2.3