From f3dc3afba8b9102a89702e5439a440d507c09950 Mon Sep 17 00:00:00 2001
From: Mariana P Braga <mpiresbr@gmail.com>
Date: Tue, 16 Dec 2025 17:32:53 +0100
Subject: [PATCH] Fix treeppl installation for mac

---
 R/utils.R | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/R/utils.R b/R/utils.R
index 3492997..111133b 100644
--- a/R/utils.R
+++ b/R/utils.R
@@ -47,7 +47,7 @@ tp_fp_fetch <- function() {
     0.0
   } else {
     # get repo info
-    repo_info <- gh::gh("GET /repos/treeppl/treepplr/releases")
+    repo_info <- gh::gh("GET /repos/treeppl/treeppl/releases")
     # Check for Linux
     if (Sys.info()["sysname"] == "Linux") {
       # assets[[2]] because releases are in alphabetical order (1 = Mac, 2 = Linux)
@@ -100,7 +100,7 @@ installing_treeppl <- function() {
     path <- system.file("treeppl-linux", package = "treepplr")
     file_name <- paste0("treeppl-",substring(tag, 2))
   } else {#Mac OS have a lot of different name
-    path <- system.file("treeppl-linux", package = "treepplr")
+    path <- system.file("treeppl-mac", package = "treepplr")
     file_name <- paste0("treeppl-",substring(tag, 2))
   }
   # Test if tpplc is already here
@@ -199,7 +199,7 @@ tp_model_names <- function() {
     coin = "coin",
     hostrep3states = "hostrep3states",
     hostrep2states = "hostrep2states",
-    treeinference = "treeinference",
+    tree_inference = "tree_inference",
     crbd = "crbd",
     clads = "clads"
   )