From a0d4b7a9a8ccf978ce79fcb84130cbd95279f097 Mon Sep 17 00:00:00 2001
From: Stefan Schlager <zarquon42@gmail.com>
Date: Tue, 16 Jul 2024 13:14:51 +0200
Subject: [PATCH] vcgImport: keep indices integers. Fixes #43

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

diff --git a/R/vcgImport.r b/R/vcgImport.r
index 4d9a8316..797a70dd 100644
--- a/R/vcgImport.r
+++ b/R/vcgImport.r
@@ -80,7 +80,7 @@ vcgImport <- function(file, updateNormals = TRUE, readcolor=FALSE, clean = TRUE,
     
     out$vb <- rbind(matrix(tmp$vb,3,length(tmp$vb)/3),1)
     if (length(tmp$it))
-        out$it <- matrix(tmp$it,3,(length(tmp$it)/3))+1
+        out$it <- matrix(tmp$it,3,(length(tmp$it)/3))+1L
     if (length(tmp$normals))
         out$normals <- rbind(matrix(tmp$normals,3,length(tmp$normals)/3),1)
     if (readcolor) {