From 63e09387e4c117833ed0c9b2d68e665acb825ff1 Mon Sep 17 00:00:00 2001
From: Jacob Kastl <60064070+jacobvjk@users.noreply.github.com>
Date: Thu, 19 Sep 2024 17:07:33 +0200
Subject: [PATCH] correct typo (#147)

---
 R/load_config.R                      | 2 +-
 R/run_calculate_match_success_rate.R | 2 +-
 R/run_matching.R                     | 2 +-
 3 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/R/load_config.R b/R/load_config.R
index 33b21720..69829dd9 100644
--- a/R/load_config.R
+++ b/R/load_config.R
@@ -119,7 +119,7 @@ get_sector_split_type <- function(params) {
   params[["sector_split"]][["sector_split_type"]]
 }
 
-get_use_maunal_sector_classification <- function(params) {
+get_use_manual_sector_classification <- function(params) {
   params[["matching"]][["manual_sector_classification"]][["use_manual_sector_classification"]]
 }
 
diff --git a/R/run_calculate_match_success_rate.R b/R/run_calculate_match_success_rate.R
index 04d50c23..0d006985 100644
--- a/R/run_calculate_match_success_rate.R
+++ b/R/run_calculate_match_success_rate.R
@@ -4,7 +4,7 @@ run_calculate_match_success_rate <- function(config) {
   dir_raw <- get_raw_dir(config)
   dir_matched <- get_matched_dir(config)
 
-  matching_use_manual_sector_classification <- get_use_maunal_sector_classification(config)
+  matching_use_manual_sector_classification <- get_use_manual_sector_classification(config)
   if (matching_use_manual_sector_classification) {
     path_manual_sector_classification <- get_manual_sector_classification_path(config)
   }
diff --git a/R/run_matching.R b/R/run_matching.R
index fe2d77c2..a569d31b 100644
--- a/R/run_matching.R
+++ b/R/run_matching.R
@@ -13,7 +13,7 @@ run_matching <- function(config) {
   matching_overwrite <- get_match_overwrite(config)
   matching_join_id <- get_match_join_id(config)
 
-  matching_use_manual_sector_classification <- get_use_maunal_sector_classification(config)
+  matching_use_manual_sector_classification <- get_use_manual_sector_classification(config)
   if (matching_use_manual_sector_classification) {
     path_manual_sector_classification <- get_manual_sector_classification_path(config)
   }