style: minor style tweaks

elipousson · Jan 4, 2024 · c422ca5 · c422ca5
1 parent 138f20c
commit c422ca5
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 4 deletions.
diff --git a/R/bing_maps_api_key.R b/R/bing_maps_api_key.R
@@ -32,7 +32,6 @@ bing_maps_api_key <- function(key,
 get_bing_maps_api_key <- function(key = NULL,
                                   default = "BING_MAPS_API_KEY",
                                   call = caller_env()) {
-
   get_r_environ_token(
     token = key,
     default = default,

diff --git a/R/map_image.R b/R/map_image.R
@@ -2,7 +2,7 @@
   packageStartupMessage(
     "Use of the Bing Maps APIs is governed by the Microsoft Bing Maps Platform APIs Terms Of Use.
     \nMore information: <https://www.microsoft.com/en-us/maps/product/>"
-    )
+  )
 }
 
 #' @noRd

diff --git a/R/utils.R b/R/utils.R
@@ -30,8 +30,8 @@ nudge_location <- function(location, nudge = NULL) {
 #' Get closest cardinal direction based on angle orientation
 #' @noRd
 closest_cardinal_dir <- function(orientation = NULL) {
- cardinal_dirs_between <- c(0, 45, 135, 225, 315)
- cardinal_dirs <- c(0, 90, 180, 270, 360)
+  cardinal_dirs_between <- c(0, 45, 135, 225, 315)
+  cardinal_dirs <- c(0, 90, 180, 270, 360)
 
   cardinal_dirs[
     findInterval(