From 6a39c9eb887fd507f8a75c89178c400995fb2b3a Mon Sep 17 00:00:00 2001
From: aheinri5 <Anna@netzkritzler.de>
Date: Fri, 18 Dec 2020 22:42:38 +0100
Subject: [PATCH] [base] Modified .prj export to fit new class

---
 R/export_prj.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/R/export_prj.R b/R/export_prj.R
index 67feb62..69ef632 100644
--- a/R/export_prj.R
+++ b/R/export_prj.R
@@ -12,7 +12,7 @@ export_prj <- function(ogs6_obj) {
     if(is.null(ogs6_obj$geometry)) {
         meshes_node <- to_node(ogs6_obj$meshes, "meshes")
     }else{
-        meshes_node <- to_node(ogs6_obj$meshes[[1]]$mesh_ref, "mesh")
+        meshes_node <- to_node(ogs6_obj$meshes[[1]]$mesh_filename, "mesh")
     }
 
     # First instantiate our big wrapper list
-- 
GitLab