typo

R/d.luft.oslyr_get.R

@@ -25,7 +25,7 @@ d.synthaq.oslyr_get_data <- function(x,username=NULL,password=NULL) {
   from <- timemanip::posixlt2char(x$timeObj$fromDateTime(),ISO8601=NULL,date_type="%Y/%m/%d %H:%M:%S")
   to   <- timemanip::posixlt2char(x$timeObj$toDateTime(),ISO8601=NULL,date_type="%Y/%m/%d %H:%M:%S")
 
-  res <- data.luftkval.oslo10::get_short_data(stations=unique(station_id),referencetimeFrom=from,referencetimeTo=to,elements=x$elementObj$element_id,timeResolution=x$timeObj$timeResolution())
+  res <- data.synthaq.oslo10.seed123::get_short_data(stations=unique(station_id),referencetimeFrom=from,referencetimeTo=to,elements=x$elementObj$element_id,timeResolution=x$timeObj$timeResolution())
 
   return(res)
 }
@@ -45,7 +45,7 @@ d.synthaq.oslyr_get_data <- function(x,username=NULL,password=NULL) {
 d.synthaq.oslyr_get_meta <- function(x,username=NULL,password=NULL) {
   username <- username
   password <- password
-  res <- data.luftkval.oslo10::get_short_meta_station(stations=x$stationObj$station_id,west=x$stationObj$west,south=x$stationObj$south,east=x$stationObj$east,north=x$stationObj$north)
+  res <- data.synthaq.oslo10.seed123::get_short_meta_station(stations=x$stationObj$station_id,west=x$stationObj$west,south=x$stationObj$south,east=x$stationObj$east,north=x$stationObj$north)
 
   return(res)
 }