Ajutised muutujad vea parandus.

R/ajutised_muutujad.R

@@ -14,13 +14,10 @@ ajutised_muutujad <- function(pk = NULL, obj = NULL, conf = NULL) {
   ## Kontrollime kas objektil on andmebaas ja kas andmebaasis on piirjoon.
   if (ruut::db_is_shema_exist(schema = conf$schema)) {
     piir_table_name <- "a00_piir"
-    pk <- NULL
     if (piir_table_name %in% ruut::db_schema_tablenames(conf = conf)) {
       conn <- ruut::db_connect(conf = conf)
       try(pk <- sf::st_read(dsn = conn, layer = c(conf$schema, piir_table_name)))
     }
-  } else {
-    pk <- NULL
   }
   ## Piirkonna muutujale väärtuste omistamine, kui seda pole antud.
   if (is.null(pk)) {