Bumped version to 0.0.4.

DESCRIPTION

 Package: easyNCDF
 Title: Tools to Easily Read/Write NetCDF Files into/from Multidimensional R Arrays 
-Version: 0.0.3
+Version: 0.0.4
 Authors@R: c(
     person("BSC-CNS", role = c("aut", "cph")),
     person("Nicolau", "Manubens", , "nicolau.manubens@bsc.es", role = c("aut", "cre")))

R/NcToArray.R

@@ -206,7 +206,7 @@ NcToArray <- function(file_to_read, dim_indices = NULL, vars_to_read = NULL,
             ##  original_ncvar_get_inner <- ncdf4:::ncvar_get_inner
             ##  assignInNamespace('ncvar_get_inner', .ncvar_get_inner, 'ncdf4')
             }
-            var_result <- do.call('[', c(list(.ncvar_get(file_object, var_name, start, count, collapse_degen = FALSE)),
+            var_result <- do.call('[', c(list(ncvar_get(file_object, var_name, start, count, collapse_degen = FALSE)),
                                          lapply(indices_to_take, function(x) if (is_single_na(x)) TRUE else x - min(x) + 1), list(drop = FALSE)))
             ### Support for character strings
             ##if ((file_object[['var']][[var_name]][['prec']] == 'char') &&