From e755634c21271f96b875dce425fc3ecf1c723a7e Mon Sep 17 00:00:00 2001
From: Michael Kirsch <mkirsch.git@gmail.com>
Date: Sun, 7 Jul 2019 22:46:51 +0200
Subject: [PATCH] add transform function to perl interface

---
 xs/xsp/TriangleMesh.xsp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/xs/xsp/TriangleMesh.xsp b/xs/xsp/TriangleMesh.xsp
index 9d965a102..0bff01bdd 100644
--- a/xs/xsp/TriangleMesh.xsp
+++ b/xs/xsp/TriangleMesh.xsp
@@ -18,6 +18,8 @@
     float volume();
     void WriteOBJFile(std::string output_file);
     void align_to_bed();
+    void transform(TransformationMatrix* trafo)
+        %code{% THIS->transform(*trafo); %};
     TriangleMeshPtrs split();
     TriangleMeshPtrs cut_by_grid(Pointf* grid)
         %code{% RETVAL = THIS->cut_by_grid(*grid); %};