transform locations if prj supplied and location has NULL/NA crs

[jhollist]

Example:

library(elevatr)
library(rgeoboundaries)
library(rgdal)

swiss_bound <- rgeoboundaries::geoboundaries("Switzerland")
elevation_data <- get_elev_raster(locations = swiss_bound, z = 10, prj=4326) #should work...