Commit 80a46e01 authored by Nicolau Manubens's avatar Nicolau Manubens
Browse files

Closing open connections.

parent b5cfb78b
...@@ -25,5 +25,9 @@ NcReadVarNames <- function(file_to_read) { ...@@ -25,5 +25,9 @@ NcReadVarNames <- function(file_to_read) {
var_names <- c(var_names, extra_dimvars) var_names <- c(var_names, extra_dimvars)
} }
if (close) {
file_closer(file_object)
}
var_names var_names
} }
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment